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ABSTRACT 


Proper interpretation of the environment is essential for mission planning and 
navigation of an autonomous mobile robot. An on board vision system may provide the 
most useful raw data. This work develops part of a vision system for the Naval 
Postgraduate School’s mobile robot, Yamabico-11. Accurately modeling the robot’s 
environment is imperative to support position verification and path planning. The 
decision to use an extended two dimensional model, an orthogonal wire-frame 
representation, is discussed. Additionally, to support pattern matching, a package of 
graphic routines, utilizing traditional algorithms and an innovative sweep algorithm (to 
determine line segment visibility), has been developed. This work demonstrates that an 
asymmetric model is appropriate to represent a three dimensional environment in support 
of vision interpretation for mobile robots. 
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I. INTRODUCTION 


A. BACKGROUND 

Research to develop accurate sensors for robots continues world wide. Much of this 
research is focused on developing robot vision systems. As a sensor, vision is intuitively 
desirable since it parallels our own sight and a large amount of passive data resides in 
a single image. 

Yamabico-11 is an autonomous, mobile robot which is under continuous development 
by students and faculty at the Naval Postgraduate School (NPS), Monterey Ca. The 
robot’s operating environment is the fifth floor of an academic building, Spanagel Hall. 
We are interested in expanding Yamabico’s sensor system to include visual image 
interpretation. 

B. CURRENT STATE OF YAMABICO 

Yamabico is currently fitted with a set of ultrasonic sonar transducers, which act as 
its primary sensors. The sonar array has a limited range of about four meters (imposed 
by the hardware) and returns from surfaces which are not perpendicular to the 
transmitting transducer can be very poor. 

Position within the operating environment is provided at the start of a mission and a 
dead-reckoning (DR) system estimates current position by tracking rotation of the two 
drive wheels. This estimate remains accurate so long as no wheel slippage occurs. 

It is desirable to develop an additional sensor system with a greater range and the 
ability to verify the estimated DR position. 
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C. DESIRED VISION SYSTEM 

Yamabico is being developed to operate in a purely manmade, indoor environment. 
For ease of implementation, this operating environment is assumed to be orthogonal. In 
light of the many limitations that arise from having an active sonar array as the sole 
sensor, we wish to add an on board vision system to Yamabico. The assumption of an 
orthogonal environment greatly reduces the complexity of designing this system, since 
only straight lines need be considered. 

The vision system will receive input from a single RGB video camera. The system 
will primarily be used to verify the DR estimate of Yamabico’s position in the 
environment. To meet this need a model of the environment must be maintained on 
board. The DR position and course will be used to determine if the image provided by 
the camera coincides with what is expected from the model. Discrepancies between the 
model and camera views will be used to calculate and correct for any errors which occur 
in the DR tracking system. Figure 1.1 illustrates the interrelation of major vision system 
components. 

D. PROBLEM STATEMENT 

Three major components are necessary to implement a vision system, specifically a 
model of the environment with supporting functions, image processing facilities and 
pattern matching facilities. The thrust of this work will be directed at developing an 
appropriate model and it’s required support functions. These functions will be needed to 
ensure proper storage and retrieval of model data. Another student, Kevin Peterson will 
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develop the processing facilities needed to extract straight line features from a camera 
image and the pattern matching facilities to match the model view to the camera image. 

E. FOCUS OF WORK 

The decision of what type of model to use must be considered carefully. The model 
should support the current as well as the future functionality of Yamabico. The 
representation used should eliminate redundant data storage wherever possible, and still 
provide simple real-time recovery of information. Likewise, support routines for model 
construction and determining the set of lines comprising a view in the model must be 
developed. 

With the above items in mind, we are primarily concerned with supporting the vision 
system’s pattern matching facilities. These will be used to compare a view from the 
camera with a view from the model. The DR position estimate and orientation in the 
horizontal plane will be used to extract the view, that Yamabico should see, from the 
model. Pattern matching between the two views will determine if Yamabico’s DR 
estimate is correct, and if it is not, should provide the angle and magnitude of error. 


F. RESEARCH METHODOLOGY 

Prior to developing any algorithms and deciding on a model, review of available 
literature pertaining to machine vision was conducted. A vast amount of theoretical and 
experimental research is being conducted to develop useful machine vision systems. Some 
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theoretical works are attempting to find a generalized solution, but virtually all projects 
are designed to solve a very specific vision problem. Our literature review attempted to 
find research wit* similar goals and to analyze their degree of success while gaining 
exposure to so? mon approaches and theories. 

The next ste]^ o develop a simple surface model of Yamabico’s environment. 
This hands on expei.. e helped identify needs and problems which had to be addressed 
in the final model decision. With these factors in mind and a good idea of what 
information was required to support pattern matching and Yamabico’s other functions, 
a model was chosen. Routines for model construction were completed and data, /lom 
blue prints and physical measurements, was entered concurrent with the coding of 
routines for data retrieval. 

While work on the model took place, Kevin Peterson designed the image processing 
routines needed to extract a set of lines from a camera image. The final position 
verification system will use lines extracted from the model and the camera image as input 
to determine the error in Yamabico’s DR position estimate. 

G. THESIS ORGANIZATION 

Subsequent chapters will describe the following: 

1. findings of the literature review 

2. the model decision and design 

3. visibility checking of model lines 

4. graphic support functions for the model 
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5. implementation, conclusions and ideas for future work 

Chapter VII is a user’s manual to help the reader and those working on Yamabico 
understand the code developed during this research. A complete listing of the final code 
can be found in appendix A. 
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U. LITERATURE REVIEW 

A. RESEARCH APPROACH 

Two major o*'’ 'ctives were pursued while conducting the literature survey. The first 
was to gain insr ^o the history of computer vision. Text books which described the 
genera! goals, i tical foundations and traditional approaches to computer vision 

were reviewed, i general idea was to gain a sound understanding of vision 
fundamentals and exposure to commercial systems currently in use. 

The second objective involved reviewing more recent material to gain insight into the 
current state of research in the field of computer vision and model representation. We 
were specifically looking for projects with similar goals to our own. Identification of 
such projects is necessary to avoid duplicating the work of others and can also yield 
performance evaluations of methods which may be useful in our own project. 

B. GENERAL REVIEW 

As stated by [Ref. 1], there are three major phases of computer vision: choosing a 
digital image representation, processing the image data and analyzing the processed 
results to guide an application. The thrust of our work tends towards the last of these 
phases. Modeling the world and extracting views are essential to support interpretation 
of the processed camera image. 

Since our work will interface with the image processing portions of the Yamabico 
vision system, it was valuable to review the feature extraction techniques presented in 
[Ref. 2]. Shirai presented traditional feature extraction methods using Hough’s transform 
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and region merging. In contrast, [Ref. 3] describes straight line finding which combines 
gradient image analysis and Sobel operators to recognize edges which exhibit a sudden 
intensity change. [Ref. 4] detailed out the mathematical basis for image understanding, 
concentrating on methods of applying statistics, i.e. using error probabilities to determine 
the threshold values for decision rules. 

Most of the projects reviewed were either targeting a different type of environment 
for their vision system or were employing some type of sensor other than the single 
camera which we are implementing on Yamabico. In the case of the Carnegie Mellon 
Navlab, [Ref. 5], the environment is an outdoor scene with a pronounced road to follow, 
while the on board vision system relies heavily on active range sensors. We find many 
vision systems which utilize range data from either sonar or laser range finders. The 
interpretation of stereo images, as in [Ref. 6] and [Ref 2], appears to be a major research 
avenue also. 

The representation used for storing information about a system’s environment is 
greatly influenced by the nature of that environment and is generally tailored to some 
degree to support the target applications or sensors. [Ref 7] uses midpoint representation 
for lines which are tracked between successive images with a Kalman filter. A similar 
parametric representation is presented in [Ref 8] for the same type of tracking. In [Ref 
9] a more complex method of geometric hashing calculates affine transformations of 
individual objects for storage and pattern matching. 

Once a set of lines has been extracted from the camera image and a model of the 
environment has been created, we are interested in extracting a view from that model and 
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using pattern matching to compare the two. [Ref 10] provides all the basic graphic 
techniques which are needed to extract a view from a model. It covers the application of 
rotation, transln"'on and scaling matrix operations on three dimensional objects. 
Projection of th. iimensional objects onto a two dimensional plane along with the 
associated clippii-^ gorithms are explained. 

C. CONCLUSIONS 

Although the scope of this work is only to develop part of Yamabico’s vision system, 
it is desirable to gain a firm understanding of the entire target system. This is true, to 
some extent, when developing any software system. A preconceived notion of the 
functional units required by the final system may allow for smoother interface 
construction and lends validity to design decisions. Both these factors can minimize 
changes late in the software life cycle. Review of the reference material has provided 
us with useful background data on the entire vision process, from image digitization to 
pattern matching. 

Our vision system will incorporate a single camera and matching will need to be done 
between the processed image and a view from an orthogonal world. The first stage of 
development involves selecting an appropriate model representation for this world. Some 
methods for representation of lines are mentioned above. These representations have been 
developed to directly support pattern matching. One of these may prove useful for 
depicting a view from the model, but they not entirely appropriate for storing the entire 
world model. Several papers, i.e. [Ref. 11], [Ref. 12] and [Ref 13], present innovative 
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vision analysis methods, but neglect to describe the model representation schemes used 
to support them. Many papers, not appearing in the bibliography, were also reviewed in 
an attempt to inspect different representation methods, but again a significant lack of 
reference to underlying models was encountered. 

The search for representation methods was not totally futile. Most references which 
were books vice papers did present some methods. In [Ref. 2] the uses of generalized 
cylinders, B-splines, extended gaussian images (EGI), and geometric models are 
introduced. We also find a description of surface models in [Ref. 1], and terrain maps 
in [Ref. 5]. Since we are attempting to model a straight line world generalized cylinders, 
terrain maps and B-spIines are not appropriate. EGI and surface model representations 
seem to lend themselves more directly to storage of our world and will be considered in 
the model decision. 

There is a substantial amount of information available concerning computer vision. 
Many basic ideas have been successfully implemented in industrial applications, 
apparently proving the value of vision research. Over the last decade or so, researchers 
have continued to modify these basic methods in an attempt to improve efficiency and 
expand the problem domain. Additionally, many interesting, original techniques have 
been developed to solve a variety of specific problem. This vast research effort has 
swamped the field with a wide variety of claims and theories regarding these techniques 
and their performance potential. Unfortunately, very few authors provide the reader with 
proof, either empirical or mathematical, of their claims. Although many forums are 
available to disseminate information on new techniques, there is a distressing lack of 
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expert review and analysis of them. This results in a huge body of unsubstantiated work, 
each author claiming that a particular method is reasonable but that theirs is better. As 
a new researcher, it was particularly daunting to sift through this ever increasing body 
of information with no expert guidance from any organization within the field. 

Due to the previous comments and differences between our goals and those of the authors 
reviewed, it is unlikely that this work will take up where another has left off. Hopefully 
the future will see the formation of a review committee of experts, within the field of 
computer vision, which can investigate and report on the variety of claims being made. 
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UI. THE MODEL 


A. REQUIRED USES 

The ultimate goal in Yamabico’s development is to maintain a single, on board model 
of the fifth floor which can be used to support all functions which may need environment 
information. This model should also be flexible enough to accommodate the data storage 
and retrieval needs of future Yamabico systems. The following requirements were taken 
into consideration as items which must be supported by the model: 

1. Accurate modelling of the three dimensional (3D) orthogonal world, fifth floor 
Spanagel Hall. 

2. Obstacle identification for the two dimensional (2D) path planning routines used 
to control Yamabico’s movements. 

3. Position verification and displacement calculations through pattern matching of key 
features viewed from an assumed position. 

4. Relatively easy to use interface for entry and modification of 3D world structures. 

B. SURFACE MODEL 

To gain a more thorough understanding of the problems and complexity which could 
be encountered in modeling the 5th floor of Spanagel Hall, we first developed a simple 
surface model of the world. Although not trivial, the interface program is fairly straight 
forward. The user is allowed to enter polyhedral shapes into the world. Each of these 
shapes receives tags which specify if the shape is fixed in the model and if it is an 
enclosure or an obstacle. Each polyhedron is defined by a list of surface polygons (walls. 
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floor and ceiling). These polygons are listed in arbitrary order and are tagged with a 
boolean value labeling them as convex or concave. 

During data entry, it became apparent that the interface required expansion to allow 
for shape modifications and deletions. It also became evident that the user was wasting 
effort when adding similar objects (such as doors) at different locations in the model. The 
interface was modified to allow for the necessary deletions and modifications. In the final 
version a user is able to store a shape he has created to a disk file and then add copies 
of that object into his world model at any point while specifying the degree of rotation 
desired about the z axis. Likewise, when the user is done working with the model, they 
can store it to a binary file (from which it may later be retrieved). 

A high degree of inefficiency is present in the above simple surface model. Many 
edges are common to more than one surface polygon. For each of these, the vertices 
which define the edge are redundantly stored in each polygon’s vertex list. When we 
consider that virtually all edges in a three dimensional model are shared between at least 
two surfaces and each vertex between three edges, it becomes very evident that a 
different representation is needed to help minimize storage requirements (especially for 
large, complex models). 

C. TAILORING TO THE APPLICATION 

In addition to the question of redundancy, we ask ourselves how a representation 
might be tailored to our target application. In this case, we are concerned with supporting 
the movement of Yamabico-11. Since this robot is of constant size and for all practical 


13 




purposes only moves in two dimensions (along a horizontal plane), we can indeed tailor 
our thinking somewhat. Yamabico currently solves path planning problems through use 
of a two dimensional model and associated algorithms. Although work to perfect path 
planning under differing conditions continues, it seems reasonable to assume the basic 
approach (which does very well) will change little. Furthermore, the addition of a third 
dimension to the problem does not significantly alter it. The only added burden in a 3D 
environment is to ensure the projection of all obstacles occurring along the height of 
Yamabico into the 2D plane that is being used for path planning. When approached in 
this fashion we find a certain asymmetric quality among the three dimensions. 
Specifically, since Yamabico travels through the x-y plane we recognize that the 
importance of explicit representations in x and y information is greater than that of z 
information. This perspective has lead us to discard the symmetric surface model and 
move on to an asymmetric ’two dimensional plus’ (2D+D) model. 

D. THE 2D+D MODEL 

Bearing all of the afore mentioned in mind, it is important to remember that the prime 
importance of developing a model is to ensure accurate representation of the world. 
Information in the representation may be explicit within the chosen data structures, or 
it may be implicit. In either case all information must be readily available or 
reconstructible. 

The 2D+D model will be represented in computer memory by a group of data 
structures joined by pointers into linked lists. Basically, the model consists only of 
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horizontal surfaces and vertical edges. With this representation we can support two 
dimensional path planning and all edges of an orthogonal world can be reconstructed for 
pattern matching and graphic display. Each horizontal surface is represented by a 
polygon which is df*'' sed by a list of vertices. We maintain the convention used in 2D 
path planning, wh . polygons which are obstacle components have vertices listed 
counter clockwise while those of enclosures are in clockwise order. The vertical edges 
of objects in the model will be represented by pointers between vertices. Linked lists will 
be used extensively, and doubly linked list will be implemented where necessary to 
enhance performance. The following types of structures are used to describe a three 
dimensional world; WORLD, POLYHEDRON, POLYGON, VERTEX and INSTANCE. 

The full definitions of these structures can be found in Appendix A (pg A-3) while 
Figure 3.1 illustrates the organization of them within memory. One parent WORLD is 
used to reference a 2D + D world model. For Yamabico, this will generally be the current 
model of the 5th floor of Spanagel Hall. This WORLD will point to a list of objects. 
Each object is designated as an obstacle or an enclosure and is represented by a 
POLYHEDRON structure. This structure in turn will point to a list of defining horizontal 
POLYGONS and a list of INSTANCES. The list of POLYGONS will be in a local 
coordinate system and each INSTANCE will indicate a location in the world where a 
copy of that POLYHEDRON resides. 

Each horizontal surface will be classified as a floor or a ceiling. Groups of surfaces 
which make up a polyhedron will be linked together and sorted by their z values. Floors 
will have a list of pointers to associated ceilings which, in the case of an obstacle, bound 
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a solid column above that floor, and in the case of an enclosure bound a column of free 
space above the floor. Figure 3.2a illustrates a simple object with one floor and ceiling 
while 3.2b shows an obstacle with multiple ceilings. 

Vertex x and y information for each POLYGON is found in a doubly linked list of 
VERTEX structures. Each vertical edge is represented as a pointer from the VERTEX 
of one POLYGON to a VERTEX in a different POLYGON. Since we are representing 
an orthogonal world, each vertex of a polygon will be allowed only one vertical outgoing 
edge. These vertical edges may be from floor to ceiling, floor to floor, or ceiling to 
ceiling. Note that these pointers should only be in the direction of increasing z value to 
avoid redundantly storing edge information (in both directions). 

As previously mentioned, each POLYHEDRON will also point to a list of 
INSTANCES. An instance will have a label and define where in the world coordinate 
system (x,y,z) a copy of that POLYHEDRON resides, what vertex in the object is to act 
as the pivot point for rotation about the z axis and the number of degrees the 
POLYHEDRON is rotated about the z axis (ROT). Storage of INSTANCES in this 
fashion reduces the storage requirements of the model and also readily supports 
movement of objects, i.e. opening doors. 
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Figure 3.2a 
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1. The Interface 


This 2D+D model will require significant pointer and storage manipulation, but 
each vertex in a world need only be stored at most once (and the z value stored only 
once per polygon). We discovered during construction of the original surface model that 
an interactive interface must address many areas. In particular the interface must provide 
facilities for easy model creation and addition as well as component structure 
modifications and deletions. Storage to and reconstitution from disk files was also 
necessary to save model information which had been entered. 

With the added complexity of the 2D+D model’s numerous pointers, it became 
apparent that construction of a useful, interactive interface would be very time consuming 
and the final product cumbersome to use. For this reason, a simplified interface was 
decided upon which still affords users the necessary functionality. 

A core of functions for construction of a 2D+D world has been provided in the 
tool file, 2d+d.h (see A-3). To create a model, a generation file of declarations and 
function calls is made which uses these tools to make the various structures and assigns 
them the correct information for the desired world. This generation file (or function) can 
then be compiled and run with the resulting world structure sent to whatever routines are 
desired (graphic display, path planner, pattern matching, etc.). This method has the dual 
advantage of utilizing a text editor for world modifications and negating the need to store 
and recover information to binary disk file after use. Functions are provided as tools for 
constructing a model, textual display of the world and memory allocation/deallocation. 
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2. Two Dimensional Path Planning 

Polygons and instances linked into their parent polyhedron structures will be sorted 
by their z value. This will allow easy determination of surfaces that will obstruct 
YAMABICO’s movements by simply considering all polygons appearing along the height 
of the robot (typically 0 to 42 inches) as input to the path planning algorithms (after 
proper filtering merges overlapping polygons). Processing to determine the 2D projection 
of the model will take little time and therefore should readily support future calculations 
of path corrections in transit. 

Routines for Yamabico’s 2D path planning are currently lisp based and assume an 
input world of polygons from a text file. Future versions of these routines will be 
implemented in C, and work directly on the two dimensional structures residing in the 
2D+D model. Until these modifications are implemented, a process may need to be 
written which generates the appropriate text file for input to the current path planner. 

E. SUPPORT FUNCTIONS 
1. Overview 

As mentioned above, there are several functions which must be provided to 
adequately implement the model we have decided upon. In general these fall into three 
groups: model construction, visibility checking and standard graphic support. 

In this chapter we will briefly revie w the set of functions which directly supports 
construction of the 2D+D model. These functions reside in the file 2d+d.h and provide 
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the facilities for memory allocation/deallocation, pointer manipulation and data insertion 
which are used to build the dynamic memory representation of our model. 

Chapter IV will discuss a visibility checking algorithm and the functions in file 
visibility.h used to implement it. This algorithm is used to determine which edges in the 
model can be seen from a given position (x,y,z). Visibility is computed without regard 
to camera orientation and view angle, the standard graphic functions will be relied upon 
to filter out edges affected by these factors. 

Chapter V describes the graphic functions from the file graphics.c. These are 
required to extract a set of lines from the 2D+D model for use in pattern matching. The 
generalized forms of these functions can be found in any standard graphics support 
library, but we have tailored them to work directly on our model. 

2. Model Construction 

This section provides a brief, general description of the functions w'hich provide 
direct support to the 2D+D model. Our intention is not to provide full directions for the 
usage of these function as that will be addressed in the users manual, chapter 6. These 
functions fall into five general categories: memory allocation, memory deallocation, 
model construction, data display and data location. We will briefly discuss each of these 
categories and why they are needed. 

Memory allocation routines (A-4) have been written to allow for easy creation of 
the objects(C structures) used in the model. These functions each return a pointer to a 
structure which has been created using the ’malloc’ command from the C language. All 
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components of the structure created are initialized to appropriate values (generally NULL 
for pointers, blank spaces for characters and zero for other types). 

The functions have been named to reflect the structures they create (i.e. create_world 
returns a pointer to a new WORLD structure). These creation routines are used 
throughout the files 2d+d.h and Sth.h for the ceation of polyhedron, polygon, vertex, 
instance, and world structures used in construction of the 2D+D model. 

It is, of course, necessary to provide memory deallocation routines to release 
memory, which is no longer needed, back to the control of the resident operating system. 
The basic C command ’free’ is appropriate for releasing the memory held by individual 
structures. Three routines have been written to deallocate the memory used in linked 
lists, these are: free_pg,free j)h and free world (A-6). The first two functions are used 
to deallocate lists of polygons and polyhedra respectively. The free_world function makes 
calls to the other functions and is used to free all of the memory used to store a world. 

Six model construction functions (A-9) provide facilities for building the 2D+D 
representation of a world. The first four of these functions allow creation and addition 
of vertex, polygon, polyhedron and instance structures to a world. Again, these routines 
are labeled to match their functionality (i.e. add_verfex, add_pg, add_ph and 
addjnstance). Each of these four functions accepts information needed to create the 
object being added and the label of the parent structure to which that object will be 
added. The parent structure of a vertex is a polygon, of a polygon or an instance is a 
polyhedron and of a polyhedron is a world structure. When the above functions are used 
to add vertices to a particular polygon, the vertices are linked in the order they are 
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added. Likewise, polyhedrons are added to the world in the order they are created. 
However, when polygons and instances are added to a polyhedron they are ordered by 
ascending z values. Return values from these functions are pointers to the newly created 
(and added) structures. 

In the previously discussed functions, facilities for building polygons were 
presented. Since all polygons in a 2D+D model are horizontal, it is necessary to provide 
methods for assigning the pointers which represent vertical edges. We also need a way 
to identify which ceilings polygons top the floors of each object. The remaining two 
functions, add_edge and addjceiling, allow this information to be added to a world via 
simple pointer manipulation. Input parameters to add_edge identify two vertices. The 
vertical edge pointer from the first of these is set to the address of the second, 
representing a vertical edge in the world. Add_ceiUng accepts pointers to two polygons 
as input, and the first polygon is added to the second polygon’s list of ceiling. 

The data display functions displayjjg and displayj)h print the information 
associated with polygons and polyhedra to the standard input output (stdio) device. The 
display_world function uses both of these to display a textual listing of an entire world 
to the stdio. 

The data location category currently contains only one function, find_ph. The input 
parameters are a string (array of characters) and a 2D+D world structure pointer. The 
string is used to search through the world for a polyhedron with a matching label. Once 
it is found the display_ph function is called to list the various components of that 
polyhedron. 
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IV. VISIBILITY CHECKING ALGORITHM 

A. PURPOSE 

When a view is being extracted from our model, it is desirable for that view to 
accurately reflect what a person (or camera) would see if they were to stand at the same 
point in the physical world. To satisfy this requirement, we cannot allow objects to be 
transparent. Accomplishing this in the 2D+D model is rather tricky, since polygons 
representing the walls of objects are not explicitly represented. We first developed a 2D 
sweep algorithm which quickly determines the set of visible lines (or edges) in a two 
dimensional world. This algorithm was then expanded to determine the visible lines in 
a three dimensional space. We will detail out the 2D algorithm and then show the 
modifications implemented to produce the 3D version. Although the 2D version is quite 
fast and accurate, we will discuss some inherent problems with the 3D version which 
limit the output to a close approximation of the set of visible lines. In both cases, the set 
of visible lines represents an unrestricted 360 degree field of vision. 

B. 2D SWEEP ALGORITHM 

We will assume standard polygon representation is being used to store vertices in the 
x-y plane. In this representation vertices of a normal (obstacle) polygon will be chained 
together in counter clockwise (ccw) order while those of an inverse (enclosure) polygon 
will be in clockwise (cw) order. In either case the function prev(V) represents the vertex 
which preceded the vertex V in a polygon. Additionally, let the reference point (rp) be 
the location of the camera in the plane and the function intersection(E,A) represent the 
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point of intersection of the edge E with a ray drawn from the rp along angle A. Two lists 
must also be maintained: the sweep list (a list of endpoints ordered by theta) and the 
considered list (a list of lines ordered by distance to the rp). 

The 2D sweep algorithm follows: 


1 for each vertex in a set of polygons loop 

2 -calculate the angle, theta, from the rp to vertex 

3 normalized to fall in 0-260 degrees 

4 -insert in sweep list ordered by ascending values 

5 for each vertex, V, on the sweep list loop 

6 if circuit(rp,V,prev(V)) is ccw and V.theta>prev(V).theta then 7 -place 

edge (V,prev(V)) on the considered list since it 

8 straddles zero degrees 

9 -set first point of edge to intersection (edge,0) 

10 for each item, V, on the sweep list loop 

f/remove all edges ending at V prior to adding the edge starting at V 

11 for each edge, E, on the considered list 

12 if V is the second point of E then 

13 if E is the first item on the considered list then 

14 -accept it as visible 

15 -change the first point of the next item, El 

16 to the intersection (El ,V’s theta) 

17 -remove E from the considered list 

18 -recalculate the distance from rp to E along V’s theta 

19 if the circuit from rp to V to prev(V) is ccw then 

20 if distance to V is less than distance to 1st edge of 

21 considered list, El then 

22 -accept El up intersection with V’j theta 

23 -change 1st point of El to 

24 intersection (El ,V's theta) 

25 -insert edge (V,prev(V)) in the considered list 


Figure 4.1 demonstrates this execution of the algorithm for a simple 2D world. For 
the purposes of this algorithm, an angle of zero degrees is defined as a line from the rp 
which runs out in the positive X direction and parallel to the X axis. After all the vertices 
have been sorted by their theta values and added to the sweep list, processing of edges 
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begins. The direction of an edge is from V to prev(V). If this direction is ccw with 
relation to the rp, there is a possibility the edge is visible so it is added to the considered 
list. If the direction of the edge is cw it is occluded from view by some other edge of the 
polygon it is part of (see Figure 4.2). To ensure the effects of those edges straddling 
zero degrees are not lost, they are added to the considered list (lines 5-8) prior to 
processing the entire sweep list. Reassignment of each straddler’s first point (line 9) 
keeps us from blindly accepting the portion lying before zero degrees. 

In the main loop (lines 10-25) each vertex of the sweep list is processed. If an edge 
is under consideration which ends with the current vertex, it is removed from 
consideration. In a 2D world there can only be one edge visible at any given point 
around the sweep. Therefore if the edge being removed happened to be first on the 
considered list, then it was closest to the rp and is accepted as visible (line 14). When 
this is the case the next edge on the list becomes visible, and the first point must be 
adjusted (line 15) so the portion occluded by the edge being removed will not later be 
accepted as visible. 

Once all lines ending at the current vertex are removed, the edge from the current 
vertex to its predecessor is inspected. If the edge is ccw then it is added to the considered 
list. If this new edge is the closest to rp, the former head of the considered list is 
accepted as visible up to the current vertex’s theta and its first point adjusted accordingly 
(lines 20-24). Notice that the main loop will remove straddling edges with the artificial 
first vertex at zero degrees, and then adds them again in the normal sequence. This 
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ccw visibility test on 
polygons 
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allows non-straddling edges to still occlude the first portion of straddling edges when they 
are added to the considered list a second time during the main processing loop (line 19). 

The algorithm is complete when the last straddling edge has been removed from the 
list and each vertex on the sweep list has been processed at least once. Notice that only 
one edge is visible at any given time and the endpoint reassignments (lines 15 and 24) 
ensure that only the visible portions of an edge are accepted. 

C. 3D SWEEP ALGORITHM 

When sweeping for visibility in a 3D world distance to edges is no longer sufficient 
criteria to determine visibility. Since occlusion of more distant edges may be total, partial 
or not occur along the Z axis, there can be any number of edges visible at a given point 
around the 3D sweep. We also have the added need to accept vertical lines which may 
reside at an edge’s endpoints. The basis of the 3D algorithm is the same as that for the 
2D sweep, but we need to add some information which denotes an edge's presents along 
the z axis. This information effectively defines each edge as a vertical wall of some 
height greater than or equal to zero. 

Specifically, each sweep list item must indicate if a vertical line begins at that vertex 
or not. Since we will be interested in determining which edges are occluded from the 
view of a single point, rp, in 3D, simply comparing z information of edges and these 
vertical lines is insufficient. For this reason, when a sweep link is formed the angle of 
elevation from the rp to the vertex is calculated and stored in the variable MIN Z. 
Likewise, if a vertical line is present at the vertex, the variable MAX_Z stores the angle 





of elevation to the upper vertex of that line. A vertex which has MIN_Z equal to 
MAX_Z will by definition have no vertical line associated with it. 

As with each sweep list item, each item of the considered list will also contain a 
C_MIN_Z and C_MAX_Z angle. In the sweep list we are concerned with z information 
mainly to represent vertical lines. In the considered list we need z information which 
accurately reflects the extent of occlusion an edge can inflict (from floor to ceiling) on 
edges behind it. Figure 4.3 demonstrates a case where z information for the considered 
list edge must be different than that of either endpoint. The function find_ceiIing_z(E) 
will be used to provide the height of the ceiling which tops a particular edge E. 

As mentioned earlier, many edges may be visible in 3D at one time. For this reason 
we have added two flags to each considered item: visible and bottom visible. The first 
flag indicates that some part of the edge’s plane of influence can still be seen from rp. 
The second flag indicates that the bottom of the edge is still visible indicating that an 
output line must be generated if the edge is modified or the sweep passes it with this flag 
set. 

The algorithm we present has been trimmed somewhat to help increase clarity. Several 
special cases occur within a model which require individual handling. Two such cases 
arise since the ccw check fails to recognize all edges of a ceiling which occurs below the 
rp and a floor which occurs above it. In these two cases the sweep list must be artificially 
manipulated to generate all edges of these polygons as ccw with respect to the rp (so they 
may be placed on the considered list). 
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Figure 4.3 

A case where the z coverage of the vertical 
lines originating at an edge’s endpointd does 
not mat^ the coverage of the edge itself. 
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The 3D sweep algorithm follows; 

1 for each vertex in the nwdel 

2 -calculate the angle, theta, from the rp to vertex 

3 normalized to fall in 0-360 degrees 

4 -calculate MIN^ from rp to V 

5 -ifV has outgoing vertical edge then 

6 -calculate MAX Z to top of vertical 

7 else 

8 MAX_Z=Mm_Z 

9 -insert in sweep list ordered by ascending values 

10 for each vertex, V. on the sweep list loop 

11 if circuit (rp,y,prev(V)) is ccw and V.theta> prevfV).theta then 12 
place edge (V,prev(V)) on the considered list since it 

13 straddles zero degrees 

14 -let C_M1N_Z = V.M1N_Z 

15 -calculate C MAX Z based on find_ceiling_z(edge(V,prev(V)}) 

16 so angle falls between -90.0 and 90.0 

1 7 for each item, V, on the sweep list loop 

18 for each edge (E) on the considered list 

19 if V is the second point of E then 

20 if E’s 2nd point has vertical edge then 

21 -calculate visibility of vertical edge and 

22 accept part of vertical line seen 

23 if E’s visible=1 then 

24 -accept it as visible 

25 -remove E from the considered list 

26 for each edge on considered list loop 

27 -recalculate C_Z_M1N and C Z MAX 

28 -calculate_visibiliry (considered list, V. theta) 

29 -recalculate the distance from rp to E along V’s theta 

30 if the circuit from rp to V to prev(V) is ccw then 

31 if V has vertical edge then 

32 -calculate visibility of vertical edge and 

33 accept part of vertical line seen 

34 -insert edge (V,prev(V)) in the considered list 

35 -for each edge on considered list 

36 -recalculate C_Z_M1N and CJZJAAX based on V’s 

37 theta (since perspective changes angles) 

38 -calculate_visibiliry (considered list, V. theta) 
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Execution of the 3D version closely parallels that of the 2D version, with some 
notable enhancements. Since vertical edges can be associated with sweep list vertices, we 
calculate the visibility of the first endpoint’s vert edge when a new considered list item 
is added (lines 20-22) and the second endpoint’s vert edge when that considered item is 
removed (lines 31-33). This calculation simply consists of looping through all the edges 
appearing in front of the current edge on the considered list. For each of these edges the 
MIN_Z and MAX_Z values of the vertical edge under consideration are adjusted to 
reflect any occlusions. When the loop is complete, if MIN_Z is less than MAX_Z the 
visible portion of the vertical edge is accepted. 

Another essential, and expensive, addition to the 3D algorithm is the recalculation of 
the elevation angles on each considered list item (lines 27,36). Since the occlusion of the 
z axis by an edge is represented by limiting angles (C_MIN_Z,C_MAX_Z), perspective 
must be considered. We cannot simply calculate the z coverage of an edge when it is 
added and assume it to be constant. The perspective changes with the distance to an 
edge, so as the sweep progresses, the coverage of edges pointing towards rp increase 
while those pointing away decrease. These calculations are jjerformed after the addition 
or removal of a considered edge and are followed by a new calculation of all edges 
visibility. 

The calculate_visibility function (lines 28,38) is the ’work horse’ of the 3D sweep 
which assigns visibility and adjusts Z coverage in response to occlusion. This function 
is executed each time a change is made to the considered list. It scans through the list 
and for each edge compares the Z coverage information to the edges behind it. The 
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visibility flags, C_MIN_Z and C_MAX_Z are adjusted based on if and how each edge 

is occluded. An additional variable associated with each edge on the considered list, 

MIN_SWEEP is introduced in this function. MIN_SWEEP keeps track of the starting 

sweep angle for which the visibility information is valid. When part of an edge is 

accepted as visible or its status changes, the MIN_SWEEP must be updated. A basic 

description of the function follows: 

assumptions: all visibility flags set 

C MIN Z and C_MAX_Z set to total coverage 
(initially no occlusion) 

input: THETA = current sweep angle 
considered list 

for each edge, E on the considered list 

for each edge El farther down the considered list than E 
-determine how E occludes El 
-case type of occlusion: 
entirely occluded: 

visible=bottom _ visible=0 
bottom occluded: 
bottom _visible=0 
EL C_M1N_Z=E. C_MAX_Z 
top_o''cluded: 

EL C_MAX_Z=E. C_MIN_Z 
for each edge, E on the considered list 

if above lOop changed E and E.bottoni_visible=l prior to 
the loop then 

-accept E from intersection(E,MlN_SWEEP) to 
intersection(E,THETA) as visible line 
-E. M1N_SWEEP= THETA 


D. PROBLEMS WITH THE 3D SWEEP ALGORITHM 

Two major concerns arise when reviewing the usefulness of our 3D sweep algorithm: 
can it support real time image processing and is the set of output lines correct. 
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Although the final goal of this work is to support a real time vision system, a hard and 
fast definition of 'real time’ is difficult to express. This is especially true in the case of 
providing support to pattern matching facilities, which themselves may take more than 
30 seconds to execute. In general, we would consider programs with a total run time 
under two seconds to be classified as real time applications. Unfortunately, as the number 
of polygons comprising our model increase to the number required to represent the target 
environment (fifth floor hallway), we find run time increasing to approximately eight 
seconds. In a hard real time system such a lag time would almost assuredly be 
unacceptable, but if we take into consideration the amount of processing time likely to 
be required by the entire vision system such performance may be tolerable. For this 
reason we will classify the visibility algorithm as having 'near' real time performance. 

The reason for this poor behavior can be attributed to the need to account for 
perspective. Recalculating the z axis coverage and the visibility for the entire considered 
list whenever an edge enters or leaves the list and at each increment of the sweep angle 
becomes quite expensive. Even so, we still see that some inaccuracies in output can occur 
since z coverage should ideally be updated continuously. 

When reviewing the correctness of the set of visible lines generated we find several 
small discrepancies. One of these is the above stated problem of not being able to 
continuously update z coverage. Associated with this is the fact that, to save time, our 
algorithm does not consider the possibility that the relative positions of edges on the 
considered list may change. Figure 4.4 illustrates how the distance to edges may call for 
a resorting of the considered list as the sweep progresses. The benefits of resorting the 
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list at each sweep increment is overshadowed by the significant increase in processing 
time which results. 

The above section discussed the ’artificial manipulation’ used to ensure floors 
occurring above the rp and ceilings occurring below have all edges ccw. Those ceiling 
edges which are forced to be ccw in general have no outgoing vertical edges and 
therefore no associated z coverage and are therefore rendered transparent (see Figure 
4.5). 

The last two items problems have been knowingly designed into the a'goi ithm and are 
not apparent from the previous description. When vertices from enclosure ceilings are 
being entered on the sweep list, they are automatically given a MAX_Z of 90 degrees. 
This is the only simple way to prevent such ceilings from being totally transparent 
(although edges directly over the ceiling can still be seen). 

Lastly, to ease the complexity of our data structures, edges are not considered to be 
occluded across the middle along their entire length (Figure 4.6). When this case does 
occur, we allow the occluding object to cast a footprint by assuming the occlusion is 
across the bottom along the entire length. To model the true situation, we require a 
representation which can track more than one non-contiguous area of coverage along the 
z axis. This would require a list of (MIN_Z,MAX_Z) pairs with splitting and merging 
functions to replace the single variables our algorithm uses. 

Chapter VI compares usage of the full 3D sweep algorithm with some quicker, but 
less accurate, implementations of the sweep method. Timing results and correctness of 
output are both discussed. 
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all edges ccw. 
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(c) 

Figure 4.6 

a. original case b. desired occlusion c. approximated result from visibility sweep algorithm 
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V. STANDARD GRAPHIC SUPPORT 
A. OVERVIEW OF OUR APPLICATION NEEDS 

Although the personal iris system on which this work currently resides does provide 
an extensive graphic support library, our vision system is being designed to reside on 
board Yamabico. Since Yamabico’s memory (both primary and secondary) is somewhat 
limited and source code for the iris library is not available, it was necessary to write our 
own graphic support functions. 

After the visibility checking algorithm has been run on a 2D+D world, we are left 
with the set of all lines which are visible from a specific point in the model. The reader 
should recall that output from visibility checking does not take the orientation of the 
observer (camera) into consideration but rather, provides a complete set of theoretically 
visible lines based upon omnidirectional sensors. The graphics support routines will 
determine which of these lines fall within the camera’s field of vision and transform them 
into a final format which can be used in pattern matching and graphic display. Since our 
vision system will exploit a single camera as it’s sole sensor, the processed image it 
provides will be composed of 2D lines. Likewise, a standard display terminal can only 
support drawing lines specified in it’s 2D screen coordinate system. For these reasons, 
the appropriate final format for our view from the model is a set of 2D lines. As with 
the 3D lines provided by the visibility algorithm, we choose to use an endpoint 
representation to specify these 2D lines. 

[Ref. 13] thoroughly describes the mathematics and principles of computer graphics. 
It was the primary reference used to design the support functions found in the file 
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graphics.h. When a view from the model world is needed, the ger_view function is 
called. This function requires a pointer to the 2D+D world and the camera’s 3D position 
(PRP), orientation (DOP) and field of view in degrees (view angle) as input. The world 
and PRP are sent to the visibility checking algorithm and the returned list of lines is 
worked with from then on. 

Since we are simulating what is seen by a single camera, we need to extract a view 
from our model which is based on a single point perspective projection. In a perspective 
projection, line size is scaled to the inverse of the distance from the camera. This allows 
distant objects to appear smaller than closer ones of the same physical dimensions. A 
parallel projection does not perform this scaling and is therefore not suitable to our 
application. 

B. GENERAL PERSPECTIVE PROJECTION 

There is a pipeline of several steps which is used to produce a perspective projection 
from a model. The steps are: 

1. Define the View Volume 

Each candidate line, in a model, must be inspected to determine if it falls within 
the observer’s field of vision. This field of vision is defined by a semi-infinite pyramid 
originating at the PRP and extending along the DOP (Figure 5.1). All lines within this 
volume will be seen by the observer. The infinite length of this pyramid is difficult to 
work with, so we define a near clipping plane and far clipping plane. These are defined 
relative to the observer and form the truncated pyramid of Figure 5.2. The height and 
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Figure 5.1 

Semi-infinite pyramid defining 
view volume for perspective projection 



Figure 5.2 

Truncated view volume. 








width of the pyramid at the near and far clipping planes is determined by the width of 
the observers viewj , or the defined size and location of the window (see section b). 

2. Select a 2D Window. 

Somewhere along the length (along the DOP) of the pyramid a projection window 
must be placed. This window is parallel to the base of the pyramid and is the surface 
onto which all accepted lines will be projected. Lines falling within the pyramid on the 
far side of the window from the observer, will be scaled down in size when mapped to 
the window, while those on the near side will be scaled. 

If the view angle is not used to define the slope of the view volume’s sides, a 
window can fully define the volume by giving its height, width, and distance down the 
DOP from the observer. 

3. Determine the Normalizing Transformation 

Although it is simple to determine if a line falls between the far and near clipping 
planes, it is difficult to calculate what portion of a line (if any) falls within the other four 
sloped planes which make up the sides of the pyramid. To ease these calculations, the 
pyramid is manipulated to form a unit pyramid which defines a canonical view volume. 
The new pyramid’s surfaces or clipping planes are represented by the following 
equations: 

right: x = -z (5.1) 

left: X = z (5.2) 

bottom: y = z (5.3) 

top: y = -z (5.4) 
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(5.5) 


front: z = z,„^ 

back: z = -1 (5.6) 

The general form of this transformation, Np,, is: 

Np., = Sp,, * SHp., * T(-PRP) * R ♦ T(-VRP) (5.7) 
where: 

T(-VRP) Translate the view reference point (VRP) to the origin. For each 3D 
point, P, which is being normalized, add the negative of the corresponding VRP 
coordinate to each coordinate value of P. The VRP is the origin of the view coordinate 
system. Since window limits are referenced from this point, it is a good idea to choose 
a VRP position which readily supports window reference (i.e., center of the window or 
a window corner). 

R Rotate the view reference coordinate (VRC) system so it is aligned with the 
(x,y,z) system. The VRC system has three components (u,v,n). Initially (Figure 5.3a) 
V is vertically aligned with the window, u runs parallel to the lower edge of the window 
and n is normal to the window surface. Proper alignment is achieved by rotation about 
the X, y and z axis. Rotation takes advantage of the trigonometric sine and cosine 
functions of the rotation angle (RA). These functions are applied to the original 
coordinates of a point, (x,y,z) to produce the new point, (xl,yl,zl). As an example, 
equations to determine rotation about the z axis are shown: 
xl = X * cos(RA) - y * sin(RA) (5.8) 

yl = X * sin(RA) + y * cos(RA) (5.9) 

zl = z (5.10) 
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T(-PRP) Translate the PRP to the origin. The PRP is also known as the center of 
projection and refers to the position of the observer or camera. 

SHper Shear the view volume along the z axis so the DOP is parallel to the z axis. 
Multiplication by a shearing matrix will augment the x and y terms to accomplish this. 
We will not go into detail on how to derive this matrix, since shearing is not needed in 
our application. The interested reader is referred to Reference 13 page 264. 

Sper Scale the view volume into the canonical perspective-projection view 
volume. We must determine a scaling factor for each coordinate system axis, which is 
multiplied by the corresponding (x,y or z) component of the point to be scaled. Here the 
goal is to map the back clipping plane so its new location is at z=-l. The apex of the 
view volume will map to z=0, leaving the front plane (located on z„„„) at its relative 
position between the two. Equations 5.1-5.6 must hold true after this scaling. To 
guarantee this, all z components are scaled by -l/(v/pj’+B). The denominator of this 
term is simply the position of the back clipping plane after it has been processed through 
the previous normalization steps. Remember that we are targeting clipping plane 
equations with unit slopes, x=z and y=z. The z scaling factor must also be applied to 
X and y to ensure uniformity, but we first must scale to produce these unit slopes. This 
is accomplished by scaling the window half-height and half-width to vrp/ (since this is 
the transformed z position at which the window now resides). Therefore the appropriate 
scaling factors for x and y are: 

(2*vrpj*)l( ■\-B)*(window width) ) (5.11) 
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(2*vrpj.’)/( (vrp,’-\-B)*(window height) ) 


(5.12) 


respectively. 

4. Apply the Normalizing Transformation to All Lines 

Each of the lines from the model are transformed and those that fall within the 
normalized canonical view volume will be seen. 

The interested reader will note that [Ref. 13] expresses all of these manipulations 
through use of matrix operations. To save the expense of writing a math package for 
matrices our application uses series of linear equations to emulate matrix use. Although 
these equations are basically equivalent, they may appear somewhat different since the 
problem we are solving is a subset of the general case. 

5. Clip Normalized Lines Against Canonical View Volume 

Each endpoint of a line will be assigned a six bit clipping code. The coordinates 
of the endpoint are compared to the equations of the canonical view volume’s planes. The 
meaning of each set bit follows [Ref. 13]: 


bit 1 - point above view volume 

V 

1 

N 

bit 2 - point below view volume 

y < z 

bit 3 - point to right of view volume 

x > -z 

bit 4 - point to left of view volume 

X < z 

bit 5 - point behind view volume 

z < -1 

bit 6 - point in front of view volume 

^ ^ ^in 
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When both endpoints of a line have clipping codes of all zeros, each endpoint falls 
within the view volume and the line is trivially accepted. Likewise, when a bitwise 
logical and of the endpoint codes does not produce all zeros the line is rejected since it 
lays totally outside the volume. When neither of these cases is met, only a portion of the 
line is within the view volume. In this case, the next step is to calculate the 
intersection(s) with the volume’s six clipping planes. This is where the advantage of 
selecting unit slopes for those planes is realized. An extended 3D version of the Liang- 
Barsky 2D clipping algorithm is employed to find the intersections [Ref. 13 pg. 274], 
This algorithm uses the parametric representation of a line: 


X = Xo + t(x, - Xo) 

(5.13) 

y = yo + t(y, - yo) 

(5.14) 

1 

+ 

O 

N 

II 

N 

(5.15) 


where t is in the interval (0,1) 

and subscripts specify which endpoint a 

coordinate refers to. 

These equations are set equal in accordance with equations 5.1-5.6 and t is solved 
for. The two t values which fall in (0,1) define the new endpoints of the partial line to 
accept. Notice that one t may be 0 or 1 if one endpoint is in the view volume and the 
other is not. 

6. Perform Perspective Projection 

Once the 3D lines within the view volume are identified, we need to map them 
onto the 2D window. This is simply accomplished by dividing each coordinate of the 











endpoints by z/d. Where z is the z coordinate of the point and d is the transformed 
position of the projection plane on the z axis. Notice that this will map the z coordinate 
of each endpoint to d. 

7. Scale Window Coordinates to Device Coordinates 

In order for our final set of output lines to be useful, we must map them from the 
window coordinates to some device coordinates. The lower left corner of our window 
is (z„,i„,z„,i„) by equations 5.11 and 5.12. The width and height of the window are both 
2’*‘z„,i„. If the new device coordinate limits are denoted by XMIN, XMAX, YMIN and 
YMAX mapping is accomplished by: 

X = ((X window coordinate-z„.J/2’<‘z„J*(XMAX-XMIN)+XMIN (5.16) 

Y = ((y window coordinate-z„,„)/2*z,„J="(YMAX-YMIN) + YMIN (5.17) 

C. PERSPECTIVE PROJECTION FOR OUR APPLICATION 

1. Define the View Volume 

The near and far clipping planes are located relative to the camera position at 1.4 
inches and 5000 inches respectively. The near clipping plane is chosen to match the focal 
length of our camera, and the far plane’s distance is greater than the total length of our 
model world (thus ensuring all lines which should be seen can be). 

2. Select a 2D Window. 

According to specifications, our video camera has a ccd element which is two 
thirds of an inch square. This element is the camera’s physical counterpart to the window 
on which we need to project the model lines. Using this information along with empirical 
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testing, we have determined that the focal length of the camera is 1.4 inches. Again, this 
value corresponds to how far from the camera (along the DOP) the window should be 
placed. 

3. Determine the Normalizing Transformation 

Figure 5.3 shows each step of the normalization process. Some of the physical 
restrictions we place upon our target system simplify the normalization transformation 
from its general form: 

Npe, = Sp,, * SHp„ * T(-PRP) * R * T(-VRP) 
to: 

Np*, = Sp,, * T(-PRP) * R, * T(-VRP) (5.18) 

where: 

T(-VRP) Translate the view reference point (VRP) to the origin (Figure 5.3b). We 
select the lower left corner of our window as this point. 

Ry Rotate the view reference coordinate (VRC) system about 
the y axis so it is aligned with the (x,y,z) system (Figure 5.3c). Rotational computations 
have been simplified from a general three coordinate rotation to a single rotation about 
the y axis. This is due to the fact that Yamabico will only rotate its camera freely in the 
model’s x-y plane'. 


' It is important to note that most graphics discussions assume 
a 3d coordinate system where the -z axis goes into the page rather 
than our model's coordinate system where the 2 axis denotes height. 
Therefore all coordinates must be shifted from model to graphic 
representation prior to performing normalization, and the 
rotation is actually about the model's z axis, as it should be. 
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T(-PRP) Translate the PRP to the origin (Figure 5.3d). This will be the position 


of Yamabico’s camera which has gone through the previous two operations. 

Sper Scale the view volume into the canonical perspective-projection view volume 
(Figure 5.3e). This is performed as specified for the general case. 

The most noticeable simplification is the omission of SHp^.^. Since Yamabico’s 
camera will be mounted perpendicular to the floor there is no need to shear the view 
volume. The DOP is always parallel to the z axis. 

4. Apply the Normalizing Transformation to All Lines 

Each line from the list of visible lines returned from ger_vie\v is transformed and 
if it falls within the normalized canonical view volume will be seen in the final output. 

5. Clip Normalized Lines Against Canonical View Volume 

This step is carried out exactly as for the general case. We have reserved space for 
the clipping codes within each LINE structure. The function ger_clipping_codes (A-46) 
assigns the six bit code to each endpoint, and the functions clipjine and dipt (A-46) 
make up our Liang-Barsky 3D clipping algorithm implementation. 

6. Perform Perspective Projection 

Since we are using the focal length of the camera to position our window, the value 
of d will be Zn,j„. This indicates that our window overlays the near clipping plane. 
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Figure 5.3 

(a) Initial viewing situation, (b) VRP translated to origin (T(-VRP)). 

(c) Rotated about y axis to align (x,y,x) with (u.vji) coordinates (Ry). 

(d) PRP translated to origin (T(-PRP)). (e) View volume scaled into canonical 
form (Sper). 




7. Scale Window Coordinates to Device Coordinates 


The final device for our projected lines will either be a window for pattern 
matching or a portion of the graphics display screen. In either case, the variables 
MIN_X, MAX_X, MIN_Y and MAX_Y are defined at the top of the file graphics.h. 
Changing these variable will allow the mapjo screen function to properly scale the final 
set of lines. 
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VI. IMPLEMENTATION AND CONCLUSIONS 

A. MODEL 

1. Appropriateness of 2D+D Model 

Our chosen representation has proven quite effective for modelling environments 
that are orthogonal with respect to the z axis. Although we cannot model curved objects 
such as door knobs, those objects which contain the major features needed for pattern 
matching are readily represented. 

Path planning has not yet been implemented using the 2D+D model, but the 
asymmetric quality of the model seems to strongly support such an application. We 
simply need to treat all horizontal polygons, which have a z value along the robot’s 
height, as objects for the path planner. To constrain the problem complexity, overlapping 
2D polygons will need to be merged together. 

2. Constraints 

The 2D+D model is not useful for outdoors environments nor for ones with many 
curved surfaces. Additionally, path planning cannot currently work directly from the 
model. The main problem is that instances of polyhedra classes share storage of vertices 
in the local coordinate system. As the model stands, a separate representation must be 
used to store the polygons required for path planning. Note that even if dedicated storage 
for each instance is allocated, the same problem may occur. This is because overlapping 
polygons still must be merged, but the underlying model must not be altered. 
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Another constraint is placed on model construction. When a polyhedron is added 
we only allow rotation about the z axis. To truly represent all possible straight edged 
objects we need to allow for rotation about all axes. 

B. GRAPHICS 

The graphics projection of a model view into 2D coordinates works well. The entire 
process takes approximately 0.5 seconds of processing time (not including the visibility 
checking algorithm). As with the model, the graphics projection routines are not 
generalized to account for camera rotation about all axes. Instead the camera is assumed 
to only rotate about the z axis. For this reason, we cannot handle cases where the camera 
is not perpendicular to the z axis (i.e., when Yamabico climbs or descends a ramp). 

C. VISIBILITY ALGORITHM 

1. Time Comparisons of Different Versions 

In order to assess the level of visibility checking which must be applied to a model 
we have tested three different versions of the sweep algorithm described in Chapter IV. 

We wish to minimize processing time and receive output which is useful for pattern 
matching against our camera image. Conclusions are based upon comparisons of 
processing time^ and output quality from various configurations within the model of 

^ Processing times are measured by stopwatch in seconds. Times 
will reflect the total time required to extract lines from the 
model, conduct visibility checking and project the lines into the 
final 2d device coordinates. 



Spanagel Hall’s fifth floor. Figures 6.1a and 6.1b show two of these views as they 
appear with no visibility checking. 
a. Simple 2D Sweep 

This algorithm does not take any z information into consideration. All edges of 
the model are assumed to lay within a single horizontal plane. Figures 6.2a and 6.2b 
show the sets of visible lines accepted from configurations matching those used in 
Figures 6.1a and 6.2b respectively. 

Total processing time for each view processed under this algorithm averaged 3.0 
seconds. As expected, the algorithm is very quick, but it is doubtful that the output is 
useful for pattern matching. When only two dimensions are considered there can only be 
one edge visible at any point around the sweep. This obviously hold true for our output. 
This is a major problem since the closest objects, no matter how small, will occlude all 
objects which are more distant. Notice that the top of the molding along the left side wall 
occludes everything behind it (even though the molding is only four inches tall). 

Another unexpected problem occurs since lights on the ceiling often fall closest 
to the camera (in the x-y plane). The camera position in Figure 6.2a had to be adjusted 
to the left since the position (44,44,44) fell directly underneath a light. At the original 
position the displayed image is blank, since the edges of the light are accepted by the 2D 
visibility check but the camera view angle (30 degrees) is not wide enough to allow them 
to be projected onto the 2D view plane. Even at the adjusted coordinates the entire right 
side of the display appears blank due to this same light. The same phenomenon is 
observed in Figure 6.2b. 
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Figure 6.1b 
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X: 20.00 V: ^^.00 
THETR(degs): 0.00 


Figure 6.2a 


X: 50.00 V: 350.C 
THETR(degs): 260.C 


Figure 6.2b 












b. Partial 3D Sweep 

This algorithm takes z information into consideration but does not account for 
perspective. The degree of coverage for each edge is calculated when the ccw sweep 
reaches its first endpoint. To save processing time, this coverage is assumed to remain 
constant as the sweep progresses along the edge’s length. In reality, coverage along the 
z axis will increase as the distance to the edge decreases (and visa versa). Figures 6.3a 
and 5.3b show the output from this algorithm. 

Total processing time for each view averaged 5.6 seconds. Although somewhat 
slower than the 2D algorithm, we see a dramatic increase in the output quality. Here the 
displays are close to what we would expect the camera to see. Unfortunately, numerous 
short lines are present which should not be and several lines which should be seen are 
not. Concentrations of these errors increase as we move along the visible edges (away 
from the first endpoint). This happens because the error between the initial z coverage 
and actual coverage increases as the sweep progresses along each edge. 

The appropriateness of this algorithm depends on how well pattern matching 
handles extra and missing line segments. If the matching algorithm is capable of 
disregarding or filtering out lines and allows partial matchings between lines, the partial 
3D sweep may be suitable. 

c. Full 3D Sweep 

This is the complete algorithm described in Chapter IV. Here we recalculate 
each edge’s z coverage and visibility for each angle around the sweep. As mentioned 
earlier, continuous correction for perspective around the sweep is not feasible. Hopefully, 







Figure 6.3a 
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this discrete method of correction provides a reasonable approximation. Figures 6.4a and 
6.4b show the output for this algorithm. 

Here we find a very disturbing increase in processing time. The average time 
for the full 3D sweep algorithm is 16.0 seconds. The majority of unwanted lines 
appearing in Figure 6.3 are no longer present, but several short spikes still occur along 
some edges. Noticeable ’tails’ are present at intersections of leading door edges and door 
jams. These ’tails’ and spikes result from using discreet intervals to re-evaluate z 
coverage. If a continuous method is developed to account for perspective, these effects 
should be eliminated. 

2. Problems 

Our greatest concern with these results lie with the excessive processing time. 
Sixteen seconds would not seem to readily support real-time processing, but does provide 
on line support for development of Yamabico’s prototype vision system. 

The problems due to discreet perspective may interfere with pattern matching. The 
particular algorithm Kevin Peterson has implemented for our initial position verification 
system does not seem to be adversely affected. 

D. roEAS FOR FUTURE WORK 
1. Data Separation 

Building a model through the function calls of a construction file, such as our 
5th.h, is somewhat wasteful. Since the construction file must be compiled and resides 
in main memory, we gain a large chunk of executable code that is only executed once. 
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A logical solution to this problem is to separate the model data from the executable file. 
A text data file could be made to hold the same information that is used in 5th.h. Unique 
field separators or a tailored storage hierarchy will need to be employed to mark data. 
This will allow an iterative function to read the data file and pass the appropriate 
information to the add functions found in 2d+d.h. 

2. Interactive Interface 

If significant modifications and additions to the model are anticipated or if multiple 
models need to be constructed, development of an interactive interface may be warranted. 
Such a program could allow entry and modification of model data through a combination 
of menu driven selections and keyboard entry of coordinates. An interface of this design 
would also readily support separation of data into a text or binary file. 

3. Extend 5th Floor Model 

The model constructed by 5th.h contains most of the major features required for 
pattern matching, but there are still modifications and additions which need to be made. 
The most notable modification required is the need to properly model the interior of the 
office spaces. The current data points within offices are estimates. Due to time 
constraints, only room 512 is accurately modeled (most other office dimensions are based 
on this room’s measurements). Additions which may prove useful include double doors 
at both ends of the hall, bulletin boards and chalkboards. The second half of the fifth 
floor and the offices lying along it also need to be added to our model. 
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4. Complete Visibility Checking 

The previous section identified some problems with our visibility checking 
algorithm. Investigation into increasing efficiency and correcting for perspective is 
needed to reduce processing time and increase output accuracy. More accurate output can 
also be achieved if the method of tracking z coverage for edges is expanded to allow for 
non-contiguous coverage, '^his will allow the occlusions of the type shown in Figure 4.7 
to be properly represented. 

5. Update Graphics Support 

Current graphic projection only allows for a camera with three degrees of freedom 
(mounted perpendicular to the floor and rotating about the z axis). Expanding the 
functions in graphics.c to allow for six degrees of freedom will provide a generalized 
solution to accommodate rotation of the camera about the x and y axes. 

6. Expand Simulator 

The simulator can easily be expanded to read configurations from path or mission 
planning routine output. Restrictions could also be imposed upon speed and turning 
radius to mirror those of Yamabico. These steps would allow the simulator to be used 
for mission simulation and analysis, rather than Just for inspecting the model. 

7. C4-+ Implementation 

The class inheritance, virtual functions and other features available in C + + may 
prove ideally suited to implementing the 2D+D model structure. Investigation into this 
possibility is encouraged. 
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8. Hardware Implementation 

All of the work presented in this thesis has been implemented on a personal-iris 
workstation. The video camera used for collecting data needs to be incorporated into 
Yamabico’s hardware design. It may also be possible to install an additional processor 
which is dedicated to supporting the vision system. Once hardware is in place, software 
installation will follow. 
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VII. USER’S MANUAL 


A. INTRODUCTION 

This manual discusses the use of the files residing on the turing personal-iris machine 
under the /yamabico/model directory. Turing is located in room 506 of Spanagel Hall 
at the Naval Postgraduate School, Monterey, California. These files, 2d-l-d.h, 5th.h, 
visibility.!!, graphics.h, 2d-i-dsini.h and interface.c, contain functions written in C. The 
files are part of the vision system being developed for use on-board Yamabico-11 (an 
autonomous, wheeled robot). 

The vision system for Yamabico utilizes a single video camera for input. Information 
about the robot’s operating environment is stored as an asymmetric 2D-I-D model. The 
2d-l-d.h file contains the functions, called by 5th.h for construction and textual display 
of this model. Visibility.h and graphics.h provide functions for extracting a view from 
the model, which may be used in the vision system’s pattern matching applications or for 
graphic display. 2d-l-dsim.h contains a basic simulator which allows the user to perform 
graphic walk-throughs of a modelled world, while the final file, interface.c, ’includes’ 
all of the previous files and provides a simple interface through which the user can access 
and test the various functions. 

B. BUILDING A MODEL 

1. Construction File 

A 2D-t-D model (Chapter III) is used to represent an orthogonal operating 
environment. A model is created by successive calls to the various construction functions 


64 







in 2d+d.h. We have created the construction file, 5th.h, to model the fifth floor of 
Spanagel Hall. This file consists of one primary construction function, make_world, 
which conducts these calls in the proper order and returns a pointer to the newly built 
world. All coordinates of our model are entered in inches. The hallway floor is 
considered to be at a z height of zero inches. The origin of the x-y plane is located at the 
north east comer of the hall. When looking at the double doors to room 506 this is the 
lower corner on the right hand side. Orienution with respect to the model is zero (or 
360) degrees looking down the x axis (across the hallway) and increases in the ccw 
direction (Figure 7.1). 

Construction files must use the C ^include 2d+d.h command to ensure access to 
the model support, functions. In turn, the construction file can be included to allow its 
compilation and use by an application program. Each add function from 2d+d.h returns 
a pointer to the specific structure which is added. The primary construction function 
takes advantage of this property to keep track of structures within the model and uses the 
returned pointers as input parameters to future calls. This approach to building a model 
requires it to be put together in a top down fashion. To accomplish this, a higher level 
structure such as a polyhedron must be added to the model prior to adding any of its 
component vertex or instance structures. 

2. Declarations 

The structure types which are used to build a model are declared at the start of the 
2d+d.h file (A-3). Of these, one world and several polyhedra, polygons and vertices 
must be declared for use in the construction file. You will notice a significant number 
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of such declarations in our construction file, 5th.h. We have adopted a convention in 
naming pointers to help keep track of relationships between structures. Examples are: 


label 

representing 

H3 

Third polyhedron declared and added. 

H3P1 

First polygon of polyhedron H3. 

H3P1V1 

First vertex of polygon H3P1. 


3. Building The Model 

Once declarations have been made, the first step is to call the add world function 
in the following format. 

WORLD *W; 

W = add worldC'name of world",13); 

PARAMETER TYPE 

1st character array (30 maximum length) 

2nd integer 

The input parameters are simply the label we wish assigned to the world and the number 
of characters in that label. The function will allocate memory, create an empty world, 
assign the indicated label to that world and initialize the other fields to indicate the world 
is currently empty. 

Once a world has been created, we can begin to add the various objects which 
make up the world. Each object is treated as a class of polyhedra. Instances from a class 
can be instantiated into the model at different positions and with different orientations. 
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This allows the polyhedron class to be described in a local coordinate system (usually 
originating at (0,0,0) in the (x,y,z) coordinate system). Recall that a 2D+D model 
representation contains only horizontal polygons and vertical edges. Groups of these two 
types will make up each polyhedron. To add an object to the world we use the 
addjyolyhedron function. 

POLYHEDRON *H1; 

HI = add polyhedronC'class name",9,W,obstacle,fi^ied); 

PARAMETER TYPE 

1st character array (30 element maximum length) 

2nd integer 

3rd world structure pointer 

4th boolean (0 or 1) 

5 th boolean (0 or 1) 

Again, the first two parameters represent a class label and its length. The third field must 
be a pointer to an existing world structure to which this polyhedron should be added. Of 
the last two boolean parameters, the first indicates if the polyhedron is an obstacle or not. 
Objects with a 0 in this field are viewed as enclosures and component polygons are 
expected to have their vertices in cw order. Obstacles will have a 1 here, and component 
polygons will have ccw lists of vertices. The final boolean tells if the object is fixed in 
the model or not. Polyhedra like doors should have a 0 in this position to indicate that 
they can move, while hallways would contain a 1. 
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When an empty polyhedron has been added to a model, it is important to complete 
its definition by adding at least one component polygon to it. This is accomplished by a 
call to add_polygon. 

POLYGON 

• • • 

HlPl = add_poIygon(Hl,z_value,noor,convex); 

PARAMETER TYPE 
1st polyhedron pointer 

2nd float 

3rd boolean (0 or 1) 

4th boolean (0 or 1) 

The first parameter must point to a polyhedron which has already been added to the 
model. The 2nd parameter indicates the height along the z axis at which the vertices of 
this polygon will be found. Floor indicates if the polygon is a floor or ceiling of HI. The 
final field indicates if the polygon is convex or not. 

A minimum of three vertices must be added to a polygon to properly define it. 
Polygons are assumed to be a closed list of vertices so the first vertex should not be 
repeated as the last vertex. It is important to ensure these lists are in cw order for 
enclosure polyhedra and ccw order for obstacle polyhedra. The add_vertex function links 
vertices into a parent polygon in the order they are added. 
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VERTEX *H1P1V1; 


HIPIVI = acld_vertex(HlPl,x,y); 

PARAMETER TYPE 

1st polygon structure pointer 

2nd float 

3rd float 

Each vertex must be added to an existing polygon pointer. The last two parameters 
denote the x and y coordinates at which the vertex is located. 

Once all of the polygons making up a polyhedron have been added, we need to 
indicate the location of vertical edges. The add_edge function accepts two vertices as 
input and creates a pointer from the first to the second which represents a vertical edge. 
add_edge(PlVl,P2V2); 

PARAMETER TYPE 

1st vertex structure pointer 

2nd vertex structure pointer 

Vertical edges should only be placed once between each pair of vertices. Each vertex 
must be from different polygons residing in the same polyhedron structure. Notice that 
there is no value returned. 

To properly identify which ceilings enclose a floor we must use the add ceiling 
function. Here the two parameters are polygons. The first is a floor and the second a 
ceiling. Ceiling associations are maintained as a list which allows more than one ceiling 
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to cover a floor. Although it is not required, vertical edges will usually be present 
between floors and their ceilings. 
add_ceilmg(HlPl,HlP2); 

PARAMETERS TYPE 

1st polygon structure pointer 

2nd polygon structure pointer 

After all the polygons, vertices, vertical edges and ceiling associations have been 
added to a polyhedron class, we can instantiate the object into our world model using 
add instance. This conserves storage space within the model and allows for easy addition 
of the identical objects often found indoors (i.e., doors and lights). 

add_iiistance("laber',5,Hl,X,Y,Z,PIVOT_X,PIVOT_Y,ROT); 


PARAMETER TYPE 

1st 

character array (30 maximum) 

2nd 

integer length of label array 

3rd 

polyhedron structure pointer 

4th-6th 

float, (x,y,z) position in model coordinates 

7th-8th 

float, (x,y) position of polyhedron’s pivot 


point in local coordinate system 
9th float, number of degrees to rotate object about 

pivot point 
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When an instance needs to be used, all vertices are translated so the pivot point becomes 
the local origin. Then the object is rotated about the z axis ROT degrees and placed at 
the (X,Y,Z) coordinates of the world. 

It is not mandatory for instances of a polyhedron class to be added to the model. When 
no instances are added, views from the model will not include the polyhedron. 

The construction file, 5th.h, is solely responsible for building our world model. 

To modify the model, we can simply edit the function calls made in this file. The use of 
instances makes adding new objects very straight forward and allows the orientation of 
existing, movable objects (i.e., doors) to be altered. 

C. CHECKING VISIBILITY 

The file visibility.h (A-14) contains the functions which conduct visibility checking 
on a 2D+D model. When a view from the model is being extracted for use in pattern 
matching or graphic display, lines that are not visible should be filtered out. The 
conduct_visibiliry_sweep function is called to provide the list of lines which can be seen 
from a specific point in the modeP. These lines do not take the type of camera or its 
orientation into consideration. This means that even lines behind the camera will be 
returned as visible. The next section tells how to get rid of these unwanted lines. Format 
of function call: 

^ The get_view function from the graphics.h file calls this 
function automatically. If you are retrieving a view from the model 
through this function a separate call to conduct_yisibility_sweep 
need not be made. 
















LINE_HEAD *LH; 

• • • 

LH = conduct_visibility_sweep(W,X,Y,Z); 

The LINE_HEAD type allows output from the visibility sweep to be separated into two 
lists. One list is of vertical lines and the other contains non-vertical lines. Input consists 
of a pointer to the world being checked and the camera position in (x,y,z) coordinates. 

D. GRAPHIC PROJECTION FROM MODEL 

The graphics.h file contains the function gef_view. This function calls the 
conduct_yisibiliryjweep function, and removes those lines (and partial lines) which 
cannot be seen by the camera. The resulting set of visible 3D lines is then projected onto 
a 2D window and mapped to a set of final device coordinates. Output is a LINE_HEAD 
pointer which consist of two lists: a list of 2D vertical lines and a list of 2D non-vertical 
lines. Vertical lines are sperate to help in the pattern matching process. The format for 
calling ger view is: 

LINE HEAD *LH; 

• • • 

LH = get_view(W,X,Y,Z,ORIENTATION,FOCALLENGTH); 
PARAMETER TYPE 
1st world structure pointer 

2nd-4th floating point (x,y,z) coordinates 

5th float, camera orientation in degrees 
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6th float, focal length of camera 

A group of definitions can be found at the top of graphics.h (A-37). These values are 
integral to proper projection. The CCD is set to two thirds of an inch, which is the 
physical dimension of our camera’s sensing element. This value is used as the 2D 
projection window dimension (CCD by CCD square), and when used with the input 
FOCAL_LENGTH determines the viewing angle of the camera. The variables MAX_X 
and MAX_Y denote the limits of the desired output coordinates to which the 2D lines 
should be mapped. If the camera, camera zoom setting or output device is changed the 
user should inspect these variables to determine if their definitions are in need of 
revision. 

E. SIMULATOR 

A basic simulator resides in the file 2d+dsim.h. The primary function, simulator, is 
passed a world structure pointer. The user is queried for the starting configuration within 
this world ((x,y,z) coordinates and orientation). This simulator is mouse driven. The left 
and right buttons are used to turn to the left and right respectively. The center button 
brings up a menu of options (Figure 7.2). To move past the initial view the ’start/restart’ 
option must be selected. The speed of the walk-through starts at zero and can be 
increased or decreased by choosing the appropriate menu option. Speed can be reset to 
zero through the ’stop’ option, while ’pause’ suspends execution until ’start/restart’ is 
selected. 
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The simulator currently uses the ger view function to retrieve the set of lines seen 
from each configuration as we move through the model. If the simulation speed is too 
slow the getJull_yiew function can be substituted for both the calls (A-51). This will 
draw all lines from the model to the screen. It may be useful to make this change when 
inspecting entry of new objects to the model. Configurations are displayed across the 
bottom of the display window. Coordinates are shown in inches while the orientation is 
in degrees. 

F. FINDING A POLYHEDRON 

The function yt/zr /_ph (A-13) is provided to display a text listing of a polyhedron and 
all of its instances. 

find_ph(LABEL,VV); 

PARAMETER TYPE 

1st array of characters (maximum length of 30) 

2nd world structure pointer 

Polyhedra structures in the world, W, are searched to find the class named LABEL. If 
the need arises, the user can easily modify this function to return a pointer to the 
polyhedron that is found. 
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G. DEALLOCATING MEMORY 


It is important to release memory which is no longer needed back to the operating 
system. We provide two functions,and free Jims to release memory held in 
a world and list of lines respectively. 
free_world(W); 
free_lines(LH); 

Both functions use the C free function to release each substructure held in all lists that 
make up the world or line list. 

H. TROUBLESHOOTING 

The following suggestions are made to help track down the cause of problems which 
may arise when using this software. If the user wishes to gain a more thorough 
understanding of why the 2D+D model was selected or how the underlying structures 
interrelate, they are referred to the first five chapters of this thesis and to the code and 
documentation found in Appendix A. 

PROBLEM POSSIBLE CAUSEtS) 

I. missing vertical lines -add_edge calls not made properly in 

construction file 

2. objects missing -add instance not called in construction file 

3. objects facing wrong direction -rotation angle in add instance incorrect 

4. view stretched or shrunk -camera or camera zoom setting changed causing 

incorrect definition of CCD or focal length 
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5. views do not match actual 

6. all model lines seen 

7. cannot turn simulator 

8. turns too much/little 

9. for each mouse click 


10. labels for model structures 


11. core dumps during execution 


-incorrect CCD or focal length camera image 
-device coordinates (MAX_X,MAX_Y) incorrect 
-call to get Jull_yie\v vice ger_view 
being made from simulator 
-start menu option not yet selected 
-adjustment needed on increment of left and right 
cases found in simulate function 
-adjustment needed on increment of speed changes 
too slow/fast speed options (3&4) in processmenuhit 
function. (File 2d-l-dsim.h) 

-global variable MAX_LEN in 2d+d.h truncated 

too short needs to be increased 

-a polygon used in the model has no 

vertices added to it 

-a structure in construction file is 

used prior to being added to the model 
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APPENDIX A 


^include <malh.h> 

^include <stdio.h> 

^include <device.h> 

^include <gl.h> 

#include "2d + .c” 
finclude "Slh.c" 

^include "mj_graphics.c’ 

^include 'visibility.c* 

/*#include ■vis2d.c'*/ /*2d and partial 3d visibility checks*/ 

/•^include "vis3d.c"*/ 

^include '2d + sim.c' 

/**********4>««*«*****«**4i******4i«****4i4i******«***4>«««+*#*4i**4i*« 

FILENAME; interface .c 

AUTHOR: LT James Stein 

DATE: Mar 1992 

Project: Thesis, supporting Yamabico’s vision system 

COMMENTS: This file has been written as an interface to help test the various functions needed to support the 2d+ model. The construction 
file 5th.h is used to build the 2d+ model of Spanagel Hall's Sth floor into memory. Once this is done the user can choose to dump a test listing 
of the model to the screen, search for a polyhedron class by name, get a view' from the model, or conduct a graphics walkthni of the model. 


/• consitants */ 

(Jdefine PI 3.141592653589793 

#defme MAX LEN 30 


void inaiuO 

{ 

WORLD •W=NULL; 
char PH_LABEL(MAX_LEN1. c; 
int OPTION =1; 
int i. PH_NUM; 

float X.Y,Z.ORIENT.FOCAL_LENGTH= 1.24; /♦FOCAL LENGTH must be adjusted for*/ 
LINE_HEAD *L1ST = NULL; /*different cameras or zoom settings*/ 

W = make_worldO: /*from file 5th.c*/ 
while (OPTION >0) { 
printf("\n\n\nl .Find a polyhedral "); 
printf('\n2.Display world (text listing)'): 
printf('\n3.Conduct graphics walkthru (iris terminal required)'); 
printf('\n4.Get view for pattern matching'); 
printf('\n\nChoose one (0 to quit): '); 
scanf('\n%d',&OPTION); 
switch (OPTION) { 
case I: /• find a ph */ 

for (i=0;i<MAX_LEN;+ +i) { /*clear old label*/ 

PH_LABEL(i] = ' •; 

} 

printf('\nPlease enter the label of the polyhedron you wish to see'): 

printf('\n(20 char max): '); 

scanf('\n%s'.PH_LABEL); 

printf('\nlndexing on label: (%s)\n'.PH_LABEL); 

find_ph(PH_LABEL.W); /*file 2d + .h*/ 

break; 

case 2: /*dump text listing of world to screen*/ 
display_worldfW); /*file 2d+.h*/ 
break: 
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case 3: /*conducl graphics simulation of walkthru*/ 
simulalefW); /*file 2d + sim.h*/ 
break; 

case 4: /*gel a set of lines making up a view in the model*/ 
printfCVnVnEnter coordinates for position of camera:\nX: '); 
scanfC\n%r,&X); 
printf{"\nY; "); 
scanfC\n%r.&Y); 
printf{"\nZ; "); 

8canfC\n%r,&Z); 

printf(”\nOrientation (0.0 is down y-axis): "); 
scanf(”\n % r .&ORIENT); 

LlST=get_fiill_view(X,Y,Z,ORIENT,W,FOCAL_LENGTH):/*file graphics.h*/ 
if (LIST) 

free_lines{LIST); /•deallocate the memory used*/ 

break: 
case 0: 

printfCExiting program\n\n"); 
break; 
default; 

printf("Invalid choice!!!"); 

} /* end case statement */ 

} /* end while loop */ 

free_world(W); /* deallocate world memory */ 

} /* end main procedure: make_world */ 
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FILENAME: 2d+d.h 

AUTHOR: LT James Stein 

CONTENTS: 2d+ model support tools (for building, displaying, searching, 
and deallocating a model) 

DATE: Mar 1992 

COMMENTS: A 'world' consists of a list of polyhedrons (PH) Each PH is in 
turn a list of polygons (PC). Each PC is a list of VERTICIES which contain 
the X,Y, and Z coordinates of that point in the world. 

File Sth.h is an example construction file which uses these (unctions to 
build a model of the 1st half of Spanagel Hall's Sth floor. 


/• constants */ 

#definePl 3.141592653589793 

^define MAX LEN 30 

I* typedefs: Define structures to be used for representing a 3-d world */ 

typedef struct vertex { 
float X,Y; 
struct vertex 
♦NEXT. *PREV. 

*VERT_EDGE; 

} VERTEX^. 

!* WHERE: VERT_EDGE = pointer to upper vertex of vertical edge 
-*/ 


typedef struct polyJink { 
struct polygon •REF_POLY: 
struct poly_link ‘NEXT. *PREV; 

} POLY_LINK; 

/* - •/ 

typedef struct polygon { 

int DEGREE. C_DEGREE. FLOOR. CONVEX; 
float Z_VALUE; 

VERTEX *VERTEX_LIST; 

POLY LINK *CElLiNG_LIST; 
struct polygon 
•NEXT, *PREV; 

}POLYGON; 

/* WHERE: DEGREE = # of vertices 

FLOOR. CONVEX = booleans 
Z_VALUE ^ local Z position poly located at 
CEILING_LIST, FLOOR_LIST = list of associated poly's 


typedef struct insunce { 
char NAME(MAX_LEN1; 
float X. Y. Z. ROTATION. 

PrVOT_X, PIVOT_Y; 
struct instance ’NEXT. ‘PREV; 
) INSTANCE; 
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/* WHERE: NAME = something like "rmSOl" 

X, Y, Z = position to instantiate PH into world 
ROTATION = degrees to rot about Z axis 

- */ 

typedef struct polyhedron { 
char CLASS[MAX_LEN]; 
int DEGREE, I_DEGREE, OBSTACLE, EKED; 

POLYGON •POLYGON_LIST; /’ordered by Z value’/ 

INSTANCE ’INSTANCE_LIST; /’ordered by Z value*/ 
struct polyhedron ’NEXT, ’PREV; 

}POLYHEDRON; 

/’ WHERE; CLASS = general name like ’door' 

DEGREE = # of polygons 
OBSTACLE and FIXED = booleans 

CEILING_L1ST. FLOOR_LIST = list comprise all polygons 
INSTANCE_LIST = all tranformations of object into world 

- •/ 

typedef struct world { 
char NAME(MAX_LEN); 
int DEGREE: 

POLYHEDRON ’POLYHEDRON_LlST; 

} WORLD: 

/’ WHERE: NAME = label for world 

DEGREE = number of object representations 
POLYHEDRON_LlST points to them 

’/ 


The following routines are called to allocate memory for a structure 

(WORLD, POLYHEDRON, POLYGON, or VERTEX). Pointers are initialized to NULL 

and the DEGREE field is set to 0: 

a**********************************************************************/ 

WORLD ’create_woridO 

{ 

WORLD ’W; 
int i: 

/’ allocate memory for a world ’/ 

if((W = (WORLD •)maIloc(sizeof(WORLD))) = = NULL) { 
printfCNncannot create a worldNn'); 

} 

/’ initialize fields ’/ 

W-> DEGREE = 0: 

W-> POLYHEDRON LIST = NULL; 
for (i=0; i<MAX_LEN; + +i) { 

W->NAME(il = ' '; 

} 

retumfW); 

) 


/• - •/ 
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POLYGON •create_polygon() 

{ 

POLYGON ‘P; 

/• allocate memoty for a polygon */ 

if((P = (POLYGON *)malloc(sizeof(POLYGON))j = = NULL) { 
printfCVcannol create a polygon"); 

} 


/* initialize fields */ 

P-> DEGREE = 0; 
P->Z_VALUE= 0.0; 
P->VERTEX_LIST = NULL; 
P->CEILING_LIST= NULL; 
P->NEXT = NULL; 
P->PREV = NULL; 


retum(P); 

} 


INSTANCE *create_iustiuice() 

{ 

INSTANCE *1; 
int i; 

1= (INSTANCE •)malloc(sizeof(INSTANCE)); 
for (i = 0; i<MAX_LEN; ++i) { 

I->NAMEIi] = '”; 

} 

I-> NEXT = NULL; 

I->PREV = NULL, 
return I: 


P0L^’_L1NK *create_poly_liiikO { 

POLY_LINK *P; 

P=(POLY_LlNK •)inalloc(sizeof(POLY_LlNK)); 
P->REF_POLY = NULL; 

P->NEXT = NULL; 

P->PREV = NULL; 
return P; 


/• - •/ 

POLYHEDRON *create_polyliedroaO 

POLYHEDRON *P; 
int i; 

P=(POLYHEDRON •)mallocfaizeof(POLYHEDRON)); 
for (i=0; i<MAX_LEN; ++i) { 

P->CLASS(i) = - ’; 

> 
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P->DEGREE=0; 

P- > POLYGON_LIST=NULL; 
P-> NEXT = NULL; 

P->PREV = NULL; 

P- > INSTANCE_LIST = NULL; 
return P; 

} /* end cre«le_poIyhedron •/ 




VERTEX •create_vertexO 

{ 

VERTEX ’V; 

V = (VERTEX •)maUoc(sizeof(VERTEX)); 
V-> NEXT = NULL; 

V->PREV = NULL; 

V-> VERT_EDGE =NULL; 
return V; 

} 


The following routines are used for memory deallocation. Each type of 
list is stepped through to free it's component structures. Higher level 
structures call the free routine for the next lower level to deallocate 
side lists (i.e. free_world calls free_polyhedron). 


'/ 


void free_pg(PG) 

POLYGON *PG; 

{ 

VERTEX •NEXT_V, *TRASH; 

POLY_LINK •N^_LINK, *TRASH2; 

NEXT_V PG- > VERTEX_LIST; /‘free vertex list*/ 
while (NEXT_V) { 

•reASH = :>EXT_V; 

NEXT_V = NEXT_V- > NEXT; 
freefTRASH); 

} 

NEXT_LINK=PG- >CEILING_LIST; 

while ^EXT_LINK) { /‘free links used to reference ceilings*/ 
TRASH2 - NEXT_LINK; 

NEXT_LINK - NEXT_L1NK- > NEXT; 
ftee(TRASH2); 


free(PG); /‘free parent polygon structure */ 
} /* ertd free_pg */ 


/• - •/ 

void frce_]ih(PH) 

POLYHEDRON *PH; 

{ 

POLYGON •NEXT_PG, *TRASH; 

INSTANCE •NEXT_I, •TRASH2; 
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NEXT_PG=PH- > POLYGON_LIST; 
while (NEXT_PG) { /*free the list of polygons*/ 

TRASH-NEXT_PG; 

NEXT_PG = NEXT_PG- > NEXT; 
free_pg(TRASH); 

} 

NEXTJ = PH->INSTANCE_LIST; 
while(NEXT_I) { /‘free the list of instances*/ 

TRASH2='nEXT_I; 

NEXT_1= NEXTJ-> NEXT; 
free(TRASH2); 

} 

free(PH); /* release parent structure */ 

} /* end free_ph */ 

void fr«e_worid(W) 

WORLD *W; 

{ 

POLYHEDRON *NEXT_PH, *TRASH; 
if(W) { 

NEXT_PH = W- > POLYHEDRON_LIST; 
while (NEXT_PH) { /*free the list of polyhedra*/ 

TRASH = NEXT_PH; 

NEXT_PH = NEXTPH- > NEXT; 
free_ph(TRASH); 

} 

) 

freefW); 

} /* end free_world */ 


The next group of functions is used to display the world. A single 
polygon, a single polyhedron, or the entire world can be displayed. 
Display is in text format to the standard output device. 


void display_pg(PG) 

POLYGON ‘PG; 

{ 

POLYGON •NEXT_PG; 

POLY_LINK •NEXT C; 

VERTEX •NEXT_V;~ 

int V_NUM«1, PRINTED=0; 

printfC\nDEGREE: %d FLOOR: 9ld Convex; %d ■.PG->DEGREE,PG->FLOOR. 
PG-> CONVEX); 

printfCVnZ = ».2f:\n”,PG->Z_VALUE); 

NEXT_V » PG- > VERTEX_LIST; 
while (NEXT_V) { 

if (HUNTED >3) { /* three vertices per line*/ 

printf(“\nVj»%d(%.2f,'*.20 '.V NUM,NEXT_V->X,NEXT_V->Y); 
PRINTED-1; 

} 

else { 

printfCV)r%d(%.2f,*.20 ■.V_NUM.NEXT_V->X.NEXT_V.>Y); 
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PRINTED++; 

> 

NEXT_V = NEXT_V- > NEXT; 

V_NUM+ + ; 

} /’end while */ 
if (PG->FLOOR= = I) 

primf("\nAssociated ceilings (%d): ■,PG->C_DEGREE): 
NEXT_C = PG- > CEIL1NG_LIST; 

} /* end display_pg */ 


/. - */ 

void display_ph(PI{) 

POLYHEDRON’PH; 

{ 

POLYGON •NEXT_PG; 

ini PG_NUM,F_CNT=1.C_CNT = 1,I_CNT = 1; 

char dummy; 

INSTANCE *NEXTJ; 

prinlfC\nPOLYHEDRON (%s):\n Obstacle: %d Fixed; %i \n". 

PH- > CLASS.PH- > OBSTACLE.PH- > FDCED); 
printf(*\nComponent polygons (91d):\n ".PH->DEGREE); 

NEXT_PG = PH- > POLYGON_LIST; 
printf("\n\nList of floors:"); 
while (NEXT_PG) { 
if (NEXT_PG- > FLOOR = = 1) { 
printf('\n\nFLCOR# %i ",F_CNT); 
display_pg(NEXT_PG); /‘display floor polygons*/ 

F CNT-f-l-; 

} /• end if */ 

NEXT_PG = NEXT_PG- > NEXT: 

} /• end while •/ 

NEXT_PG = PH- > POLYGON_LIST; 
printf("\n\nList of ceilings:"): 
while (NEXT_PG) { 
if (NEXT_rc- > FLOOR = = 0) { 
prinlf("\n\nCElLING # »d •,C_CNT); 
display_pg(NEXT_PG); /‘display ceilings*/ 

CCNT-t--!-; 

} /* end if */ 

NEXT_PG=NEXT_PG- > NEXT; 

} /* end while */ 

printf("\n\nThe following instantiations of this polyhedron exist:"); 

fflushCstdout); 

if(PH==NULL){ 

printf("\n\ndereferencing null pointer in display_ph\n\n"): 
fflushCatdout); 

} 

NEXT_I=PH- > INST ANCE_ LIST; 
while(NEXT_I) { 

prinlf("\n\nlnswnce #%d (%s): ■,I_CNT,NEXTJ->NAME); 
fflushfsldout); 

prinlf(’\nLocation: (%.2f,%.2f, % .20'.NEXT_I- >X.NEXTJ-> Y.NEXTJ->Z); 
fflushCatdoul); 

print(i('Rotated: % .2f degrees about point: {% .2f,% .20\n‘, 

NEXTJ- > ROTATION.NEXTJ- > PIVOT_X,NEXT_I- > PIVOT_Y); 
flluah(stdout); 

I_CNT-t--t-; 

NEXT_I=NEXT_I- > NEXT; 

} /* end while */ 

} /* end displayjph */ 
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void display_worid(W) 

WORLD *W: 

{ 

POLYHEDRON’PH; 

POLYGON ‘PG; 
ini NUM_PH = 1; 

if(W) { 

printf('\nWorld N«me; %s",W->NAME); 

primfC\n\nWorld has:\n %d POLYHEDRONS\n ■,W-> DEGREE); 

PH=W- > POLYHEDRON_LIST; 
while (PH) { 

prinlfC\n\nPH #%d \n”,NUM_PH): 

NUM_PH + + ; 
display_ph(PH): 

PH = PH-> NEXT; 

} 

} /* end if */ 

} /• end display world */ 

/*********************************’¥*'**************<*************** 


The following functions are used by the construction file 

to add structures (i.e - POLYHEDRON. POLYGON. VERTEX, and INSTANCE) 
and associations (i.e.- vertical edges and floor- >ceiling associations) 
to a world. 

I*****************************************************************/ 


void add_«dge(Vl,V2) 

VERTEX *V1, •V2; /*lower and upper vertices of edge*/ 

< 

if (V1->VERT_EDGE) 

prinlf("\nWaming reassignment of vertical edge attempted!!!”); 
else 

V1->VERT_EDGE = V2; 

} /* end add_edge */ 


void add_ceiIing(PG.C) 

POLYGON ‘PG, *C; /•floor and its new ceiling*/ 

{ 

POLY_LINK *NEW_C.*NEXT_C; 
ini FOUND=0; 


if (PG- >CEU,ING_LIST) { 
NEXT_C= PG->CEIL1NG_LIST; 
if (NE5h'_C- > REF_POLY = = C) 
FOUND~=l; 
else 


while (NEXT_C- > NEXT) { 

if (NEXT_C- > NEXT- > REF_POLY = =C) 
FOUND=l; 

NEXT_C=NEXT_C- > NEXT; 

} /* end while */ 
if (FOUND ==0){ 

NEW_C*creaie_poly_linkO; /‘link onto end of list*/ 
NEw”c- >REF_POLY = C; 

NEW_C- > PREV = NEXT_C; 

NEXT_C- > NEXT=NEW_C; 
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PG->C_DEGREE++; 

} /• end if */ 
else 

prinlf(*\nWaming - attempted to add ceiling which exists"): 
} /* end if */ 
else { 

NEW_C=create_poly_linkO;/‘adding 1st ceiling to list*/ 
NEWC- > REF_POLY = C; 

PG- > CEILING_LIST=NEWC: 

PG->C_DEGREE+ + ; 

} /• end else */ 

) /* end add_ceiling */ 


/****,*•••**••*«•***«••**•**.••***•••••**•*•*..**«*.*,*«*»**.*•*** 

X,Y,Z is the position in the parent world at which the pivot point 
is to be placed. 

PIVOT_X and PrVOT_Y specify th local coordinates (in POLYHEDRON) of 
the objects pivot point. 

ROT is the number of degrees the object should be rotated about this 
pivot point. 

*************************#**********************<¥#****************/ 
void •add_iiistance(NAME,LEN,PIl.X.Y.Z.PI\'OT X.PIVOT Y.ROT) 
POLYHEDRON‘PH: 
noat X,Y.Z.PIVOT_X.PI\'OT_Y.ROT: 

char NAMED: /‘label for instance and number of characters in label*/ 
int LEN: 

{ 

INSTANCE •I.*TEMPJ.*NEXT_I: 
in! i. 

l=create_instanceO; /‘allocate and initialize memory*/ 
for (i = 0;i< =LEN;+ +i) { 

I->NAME(il = NAMEli): 

) 

I->X = X: 

I->Y=Y: 

I->Z=Z; 

I- > prvOT_X=PIVOT_X; 

I- > PIVOT_Y = PfVOT’Y: 

I- > ROTATION = rot” 

/‘order by z*/ 

if (PH- > INSTANCE_LIST= =NULL) { 

PH-> INSTANCE LIST=I; 

} 

else { 

NEXT_I=PH- > INSTANCE_LIST; 
if(Z<”=NEXT_I->Z){ 

I->NEXT=NEXT_I; 

NEXT_I->PREV=I; /• add to head of list*/ 

PH- > INSTANCE_LIST= 1: 

) /* end if */ 
else { 

while (NEXT_I- > NEXT&&NEXT_I- > NEXT- > Z < Z) { 

NEXT_I=NEXT I->NEXT: /‘scan to insertion point*/ 

} 

if (NEXT_I->NEXT) { 

I- > NEX'f=NEXT_1- > NEXT; /‘add to middle of list*/ 
I->PREV=NEXT_I: 

NEXTJ->NEXT=I: 

I->N^->PREV=I; 

} /* end if */ 
else { 

I- > PREV = NEXT_I: /‘add as last instance*/ 
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NEXT_1->NEXT = I; 

} /* end else */ 

} t* end else •/ 

} /* end else */ 

PH- > I_DEGREE-(- -(■; /*kecp track of the number of instances*/ 

} /* end add instance */ 

l************************<^***i****-****’¥*******^****1f***^*»************ 


The remaining add functions create and add structures to the world. 
Pointers to each newly added structure are returned to the caller for 
future use. 


VERTEX *add_vertex(PG.X.Y) 

POLYGON *PG; /• parent polygon to add vertex to*/ 
float X.Y; /*local coordinates of vertex*/ 

{ 

VERTEX *V. *NEXT_V; 

V = create_vertexO; 

V->X = X; 

V->Y = Y; 

if (PG-> VERTEX_LIST= =NULL) 

PG->VERTEX_L1ST = V; 
else { 

NEXT_V = PG- > VERTEX_LIST; 
while (NEXT_V- > NEXT) { 

NEXT V = NEXT V- > NEXT; /* scan to end of list */ 

} 

NEXT_V- > NEXT = V; /* add to end of list to retain order added*/ 
V->PREV = NEXT_V; 

} /* end else */ 

PG->DEGREE-I--I-; 
return V; 

} /* end add_vertex */ 


/*.*/ 

POLYGON *add_pg(PH.Z,FLOOR.CONVEX) 
POLYHEDRON *PH: /*parent structure*/ 

float Z; /*height in local coordinates*/ 

int FLOOR,CONVEX; /*boolean values*/ 

{ 

POLYGON •PG,*NEXT_PG; 


PG=create_polygonO; 

PG->Z_VALUE=Z; 

PG-> FLOOR* FLOOR; 

PG- > CONVEX = CONVEX; 

if (PH- > POLYGON_LIST = = NULL) /*sorted by Z height*/ 
PH - > POLYGON_UST=PG; 
else { 

NEXT_PG = PH- > POLYGON_LlST; 
if (Z<NEXT_PG->Z_VALUE) { /‘pul at head of list*/ 
NEXT_PG- > PREV=PG; 

PG-> NEXT=NEXT_PG; 

PH- > POLYGON_LIST = PG; 

} /* end if */ 
else { 
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while ((NEXT_PG- > NEXD&&(NEXT_PG- > NEXT- > Z_VALUE > Z)) { 
NEXT PG=NEXT PG->NEXT; 

} 

if (NEXT_PG->NEXT) { 

PG- > NEXT = NEXT_PG- > NEXT; /* put in middle of list */ 

PG- > PREV = NEXT_PG; 

NEXT_PG-> NEXT=PG; 

PG-> NEXT-> PREV = PG; 

} /* end if */ 
else { 

NEXT_PG->NEXT=PG; /• put at end of list •/ 

PG- > PREV = NEXTPG, 

} /• end else •/ 

} /• end else */ 

} /• end else */ 

PH-> DEGREE-(--I-; 
return PG; 

} /• end add_pg •/ 


/*■ 


POLYHEDRON •add_ph(CLASS.LEN.W.nXED,OBSTACLE) 
char CLASS[]; /’class name*/ 

WORLD *W; /’world to add polyhedron to’/ 

int FDCED.OBSTACLEXEN; /’ 2 booleans and the length of CLASS’/ 

{ 

POLYHEDRON ’PH,’NEXT_PH; 
int i; 

PH = create_polyhedronOt 
for Ci=0;i<=LEN; + -l-i) { 

PH->CLASSIil = CLASS(il; 

} 

PH->FD(ED=FIXED; 

PH- >OBSTACLE=OBSTACLE; 

if (W- > POLYHEDRON_LIST= = NULL) 

W- > POLYHEDRON_UST = PH; 
else { 

NEXT_PH = W- > POLYHEDRONLIST, 
while (NEXT_PH->NEXT) { 

NEXT PH = NEXT PH- > NEXT; /’scan to end of list’/ 

> 

NEXT_PH-> NEXT=PH; 

PH-> PREV = NEXT_PH; 

} /’ end else ’/ 

W-> DEGREE 
return PH; 

} /’end add_ph’/ 

/.-’/ 

WORLD •add_worid(NAME.LEN) 
char NAME[]; /’label and its length’/ 
int LEN; 

< 

WORLD ’W; 
int i; 

W*create_worldO; 

for (i=0;i < LEN; -b -t- i) { /’assign label’/ 

W->NAME[i)-NAME(i); 

} 

return W; 

) /’ end add_world ’/ 
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rind_ph will find and display a polyhedron based on its class 
name. Component polygons and instances will be listed to the screen. 
If the pointer to a polyhedron is needed: change this function 
return PH. 


void riiid_ph(LABEL.W) 

char LABEL(MAX_LEN]; /‘class label to look for*/ 
WORLD *W; /’world to search*/ 

{ 

POLYHEDRON *NEXT_PH. *PH; 
int FOUND=0, i. MATCH; 


if(W) { 

printf(*\nsearching for label: ("); 
for (i = 0;i<MAX_LEN; + +i) { 
printfC^c'.LABELli]); 

> 

printff")\n“); 

NEXT_PH = W- >POLYHEDRON_LIST; 
while (NEXT_PH) { 

MATCH = 1; 

for (i = 0;i<MAX_LEN; + +i) { 

if (NEXT_PH- >CLASSli)! = LABEL(i]){ 

MATCH =0; /‘at least one character is different*/ 


} 


if (MATCH = = 1) { 
FOUND++; 

PH = NEXT_PH; 


NEXT_PH = NEXT_PH- > NEXT; 

} /* end while */ 
if (FOUND ==0) 

printf("\nNo polyhedron found under this label!\n’); 
else { 

display_ph(PH); /’show the polygon found*/ 
if (FOUND >1) 

printf("\nWaming non-unique label (last occurance listed).\n"); 
} /* end else */ 

} /* end if */ 
else 

printf("\n\nCannol find polyhedron since world is empty '.'.!\n"); 

} /* end find_ph */ 
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/* 

FILE NAME: visibilily.h 
AUTHOR: James Stein 

PROJECT: Thesis, supporting Yamabico vision system 

DATE: March 1992 

ADVISOR: Dr. Kanayama 

COMMENTS: This file implements a algorithm which determines the set of 
visible line seen from a given position in a wire frame model. The observer is 
assumed to have omni-directional vision. To impose the physical limits of 
a camera's field of view, the function get_view in file graphics.h can be 
sent a model (as it in turn uses this file). 

Primary Function(s): 

- conduct_vsiibility_sweep 

INPUT: W a pointer to a 2d + world model 

EYE_X,EYE_Y,EYE_Z position of observer in model W 


*/ 


OUTPUT: L1NE_LIST structure pointing to 2 lists of 

visible vertical and non-vertical lines 


/*-Structure definitions:--—*/ 


typedef struct sweep_link { 

double THETA. X. Y. Z. 

MIN_Z. MAX Z. UPPER Z. DIST: 
VERTEX ‘V; 

INSTANCE *1: 

POLY_LINK *CEILINGS; 
struct sweepjink ‘PREV. ‘NEXT; 

} SWEEP_LINK: 


/* -- •/ 


typedef struct consideredjink { 
double MIN_SWEEP. 

MIN_Z, MAX_Z. DIST. 
NEW_MIN_Z,NEW_MAX_Z,UPPER_Z; 
int VISIBILITY.B_VISIBILrrY,NEW_VISIBILrrY.NEW_B_VISIBILrrY; 
POLY_LINK •CEILINGS; 

SWEEP_LINK *SL1, •SL2; 
struct considered_Iink ‘NEXT; 

} CONSIDERED_LINK; 
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typedef stnicl considered_head { 

CONSIDERED_LINK ’LINKS; 

} CONSIDERED_HEAD;” 

/* - */ 


/* global variables: •/ 

static double X,Y,Z; /’Position of observer within the model’/ 

static THETA; /’Current angle of visibility sweep’/ 

int IN_MAIN; /’if 0 we are still preprocessing straddlers’- 


void Une_ray_mterseclion(CONSIDERED_LIN’K ’CL.double ANGLE. 

double ♦INT_X,double ’INT Y.double ’DIST); 


/’ Doubles can be truncated to 4 decimal places to compensate for inexactness 
of floating point operations’/ 

double tnuic(X) 
double X; 

{ 

int DUMMY; 
double XX = X; 

DUMMY = XX’10000; 

XX = DUMMY; 

XX=XX/10000.0; 
return XX; 

) 




double degxIRADS) 
double RADS: 

{ 

return trunc(RADS’180.0/PI); 

} 


double rad$(DEGS) 
double DECS; 

{ 

return trunc(DEGS’PI/I80.0); 

} 











/* Determines if the edges from 2 considered links are colinear*' 

iut cotuieiir(F,B) 

CONSJDERED_LINK 

{ 

double Ml,M2; /*we will compare slopes and distance*/ 


} 


MI = trunc((F- > SLI - > Y-F- > SL2- > Y)/(F- > SLI - > X-F- > SL2- > X)); 
M2=trunc((B- > SLI - > Y-B- > SL2- > Y)/(B- > SL I- > X-B- > SL2- > X)); 
if ((MI = = M2)&&(F- > DIST = = B- > DIST)) 
return I; 

else 


return 0; 


/*..»**..***,.*,**,*»***,*****,COUNTERCLOCKWlSE CHECKS**********************/ 

int ccw(SL.PREV_SL) 

SWEEP LINK *SL. *PREV_SL; 

double AREA; 

AREA= 0.5*{(SL- >X-X)*(PREV_SL- > Y-Y)- 
(PREV SL- >X-X)*(SL- > Y-Y)); 
if (AREA >0.6) 
return I; 
else 

return 0; 

} /* end ccw */ 


iut ccw2(SLl.SU.SL3) 

SWEEP LINK*SLI,*SL2.*SL3; 

{ 

double AREA; 


AREA= 0.5*((SL2- >X-SLI- >X)*(SL3- > Y-SLI- > Y)- 
(SU- > X-SLI - > X)*(SL2- > Y-SLI - > Y)); 
if (AREA >0.0) 
return I; 
else 

return 0; 

} /* end ccw */ 
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I* Finds the angle from X1. Y1 to V for use in detentlining if X1 .Y1 lies 
within the bounds of a polygon.*/ 

double nud_tbeta(Xl,Yl,V.I) 
double Xl.Yl; 

VERTEX ’V; 

INSTANCE *1; 

{ 

double X2,Y2,T; 

double LOCAL_X.LOCAL_Y.ROT_X,ROT Y,RADS; 

LOCAL_X = V->X - I->PrVOT_X; 

LOCAL_Y = V->Y - I->PIVOt”Y; 

/* rotate about the z axis */ 

RADS = I- > ROTATION * PI / 180.0 ; /* convert degs to rads •/ 

ROT_X = (cos(RADS)*LOCAL_X) + (sin(RADS)*LOCAL_Y); 
ROT_Y = (cos(RADS)*LOCAL_Y)-(sin(RADS)*LOCAL_X); 

/* translate to proper position in world model */ 

X2 = I->X + ROT_X; 

Y2 = I->Y + ROTY; 

if ((X1 = =X2)] |((Y1 = =Y2)&&(X1 = =X2))) 

T=0.0; 

else 

T=atan2(Y2-YI.X2-XI); '• both won't be 0 •/ 
if (T<0.0) 

T+ =rads(360.0); /* nonnalize to 0-360 */ 

return T; 

} /* end rind_theta */ 


/* This function determines if the point XI .Y1 lies within the polygon, PG. 

The angle formed between lines drawn to each edge of PG is calculated. 

CW angles are added and CCW ones are subtracted from the sum. 

If the sum is not equal to 0.0 the point is within PG and I is returned.*/ 

iiit in_polygoii(Xl,Yl,PG.I) 
double Xl.Yl; 

POLYGON *PG; 

INSTANCE *1; 

VERTEX •FmST V, *V = PG-> VERTEX LIST; 

double THETAl.THErA2.FIRST_THETA,SUM = 0.0.SUMI =0.0; 

double XX,YY; 


THETA2«find_theta(Xl,Yl,V,I); 

FIRST_V = V; ” 

FIRST~THETA =THETA2; 
while (V->NEXT) { 

if ((X1 = = V- > X)&&(Y I = = V- > Yj) 

SUM 1 = 1.0; /*if directly under a point accept*/ 

THETAI=THETA2; 

THETA2 = findJhetafX 1. Y1 ,V- > NEXT.I); 

/*ccw*/ 

if ((0.5*((V- > X-X1 )*fV- > NEXT- > Y-Y1 )- 
(V- > next- > X-X I )*(V- > Y-Y 1))) > 0.0) < 
if (THETA2< THETA 1) 

SUM-t- =(THETA2-t-rads(360.0))-THETAl 
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else 

SUM + =THETA2-THETA I; 

) 

/•cw*/ else { 

if {THETA2>THETAI) 

SUM+ =THETA2-(THETAI +rads(360.0)). 

else 

SUM + =THETA2-THETAI ; 

} 

V = V->NEXT; 

} /* end while */ 

/•Lastly: check the closing edge to see if we add or subtract its angle*.’ 
THETA1==THETA2; 

THETA2=F1RST_THETA; 

if ((0.5*((V- >X-XI)*(FIRST_V- > Y-YI)-(FIRST_V- >X-X1)*(V- > Y-YI))) > 
0.0) { /*ccw*/ 

if(THETA2<THETAl) 

SUM + = rrHETA2 + rads(360.0))-THETAl; 

else 

SUM + =THETA2-THETA I; 

} 

else { 

if (THETA2>THETAI) 

SUM+ =THETA2-(THETA1 +rads(360.0)); 

else 

SUM+=THETA2-THETAI; 

} 

if (((tronc(SUM)= =0.0))&&(SUMI = =0.0)) 
return 0: 

else 

return I; 


/• Function checks to see which ceiling of CL’s ceiling list the Jsl endpoint 
falls under. This height is returned and is used to determine how much 
coverage the CL has along the z-axis (that is what angle bound the portion 
of the z-axis which CL occludes*/ 

double fuid_ceiling_z(CL) 

CONSIDERED_LINK *CL. 

{ 

double IX,IY,DIST,CEILING_2_VALUE=(-9999999.9); 
POLY_LINK *NEXT_C = CL- >CE1LINGS; 
int FOUND=0; 


IX=CL->SLI--'X; 

IY = CL->SL1->Y; 
while (NEXT_C) { 

/•keep track of highest ceiling over CL*/ 

if ((in_polygon(IX.IY,NEXT_C- >REF_POLY,CL- > SLI- > I)= = 1)&& 

{NEXT_C- > REF_POLY-~> Z_V ALUE-l- CL- > SLI - > I- > Z >CEIL1NG_Z_V ALUE)){ 

CEILING_Z_VALUE=NEXT_C- >REF_POLY- >Z_VALUE-bCL- >SLI- > 1- > Z; 
FOUND=l:~ 

} 

NEXT C = NEXT C->NEXT; 

) 

if (FOUND ==0){ 

CEILING Z VALUE=CL->SLI->UPPER_Z; /’if none ht same as endpoint*/ 

} 

return lrunc(CEILING_Z_VALUE); /*relum highest ceiling ht*/ 

) /* errd find_ceiling_z */ 
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/* Calculate the minimum and maximum angles which SL covers on the z-axis. 
Any object which is farther away and behind SL that falls within these 
limits will not be able to be seen. */ 


void calc_z_covera(5e(SL) 

~SWEEP_UNK *SL; 

{ 


double dz.LEN; 


dz = SL->Z-Z; 

LEN = SL->D1ST; /*dist to line in X-Y plane*/ 
if a.EN==0) 

LEN = 0.00001; 

SL- > MIN_Z=trvinc (atan(dz/LEN)); 
d2=SL->UPPER_Z-Z; 

SL- > M AX_Z=trunc(atan(dz/LEN)); 

} /* end calc_z_coverage */ 


/* Absolute value of a double */ 


double my_abs(A) 

double A; 

{ 

if (A >=0.0) 

return A; 

else 

return -A; 

} 


/* Calculates the limiting angles along the z-axis for each item on the 
considered list. These limits are based upon the height of each 
endpoint (value of CL- >MIN_Z) and the height of the ceiling (if any) 
lying above CL (CL->UPPER_Z). */ 

void cak_curreat_2_coverage(CLIST) 

CONSIDERED HEAD *CLIST; 

{ 

CONSIDERED_LINK •CL=CLIST- > LINKS; 

double MIN.MAX.DIST; 

double dx.dy.dz.IX.IY,LENl.LEN2, 

CEILING Z; 


while (CL) { 

CL- > NEW_M/VX_Z=lrunc(atan((CL- > UPPER_Z-Z)/CL- > DIST)); 
CL- > NEW_MIN_Z=tninc(atan((CL- > SL 1 - > Z-Z)/CL- > DIST)); 
CL->NEW_VISIBILrrY = 1; /‘reset visibilities*/ 

CL- > NEw“b_VISIBILITY = 1; 

CL=CL->NEXT; 

) 

} /* end calc_cuiTent_z_coverage */ 
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/■ 


■MEMORYALLOCATION FUNCTIONS' 


7 


LINE HEAD *iiiake line beudO 

{ ' 

UNE_HEAD *LH = (LINE_HEAD ■►)malloc(sizeof(LINE_HEAD)); 

LH-> LINES = 0; 

LH->VERT_LINES=0; 

LH- > LINE_llST=NULL; 

LH-> TAIL* NULL. 

LH- > VLINE_LIST = N ULL; 

LH->VTAIL=NULL; 
return LH; 

} I* end make_line_head *! 


C0NS1DERED_HEAD *uiake_coiisidered_head() 

{ 

CONSIDERED_HEAD *CH; 

CH= (CONSIDERED_HEAD ■')malloc(sizeof(CONSIDERED_HEAD)); 
CH->LINKS = NULL; 
return CH; 

) I* end make_considered_head */ 
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SWEEP_L1NK *make_sweep_liiik(PH.PG.V.I.PG_Z) 
POLYHEDRON *PH; 

POLYGON *PG; 

VERTEX *V; 

INSTANCE *1; 
double PG_Z; 

{ 

SWEEP LINK *SL; 

double LOCAL_X,LOCAL_Y.ROT_X.ROT_Y.RADSi 


SL= (SNVEEP_L1NK •)malloe(sizeof(SWEEP_LINK)); 
SL->PREV= NULL; 

SL->NEXT= NULL; 

SL->V = V; 

SL->I = I; 

SL- > CEILINGS = PG- > CEILINGLIST; 

LOCAL X = V->X - I->PIVOT_X; 

LOCAL Y = V->Y - l->PIVOT_Y; 


/* rolale about the z axis */ 

RADS = I- >ROTATION * PI / 180.0 ; /• convert degs to rads »/ 

ROTX = (cos(RADS)*LOCAL_X) + (sin(RADS)*LOCAL_Y); 

ROT_Y = (cos(RADS)*LOCAL_Y)-(sin(RADS)*LOCAL_X); 

/* translate to proper position in world model */ 

SL->X = lrunc{l->X + ROT_X); /*must be truncated*/ 

SL->Y = trunc(I->Y + ROT_Y); 

SL->Z = trunc(I->Z + PG_Z); 

SL->THETA = (atan2(SL->Y-Y.SL->X-X)); /* both won't be 0 •/ 
if(SL->THETA<0.0) 

SL- >THETA = (2.0*P1 -(■ SL- >THETA); /* normalize to 0-360 •/ 
SL->DIST= trunc(sqn(pow((SL-> Y-Y).2.0)-t-pow((SL->X-X),2.0))); 
if (V->VERT_EDGE) 

SL-> UPPER_Z = find_z(PH.V- > VERT_EDGE) + I- >Z; 
else 

SL->UPPER_Z = SL->Z; 

if ((PH- >OBSTACLE =~=0)&&(PG- > FLOOR = =0)) 

SL- > UPPER_Z = 99999999999.9;/*inax float to cover 90 degs*/ 
calc_z_coverage(SL); 
return SL; 

} /* end make_sweep_link */ 
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CONSIDERED_LINK •make_coiisidered_liiik(SL) 

SWEEP_LINK ‘SL. 

{ 

CONSIDERED_LlNK *CL=(CONSlDERED_LINK»)manoc(si 2 eof(CONSIDERED_UNK)); 


CL->SL1=SL; 

CL->DIST=SL->DIST: 

CL->SL2=SL->PREV: 

CL- > CEILINGS = SL- > CEILINGS; 

CL->VISIBILITY=1: 

CL->B_VISIBILITY=I; 

CL- > NEWVISIBILITY = 1; 

CL- > NEW_B_ VISIBILITY = 1; 

CL->NEXT=NULL; 

CL->MIN_SWEEP=SL->THETA;/*sel min to rcllect sweep so far*/ 
CL- > MIN Z = SL- > MIN Z, 

CL- >MAJC_Z = SL- >MAX_Z; 

if (CL- >SLI- > UPPER_Z > 9999999.9) /*need to Irune????*/ 

CL- > UPPERZ = 99999999999.9: 

else 

CL->L)PPER_Z = find_ceiling_z(CL); 

return CL; 

} /* ntake_considered_link •/ 




^44*<4>4i4*4t444i4i4*4i4«4 4*444*«*44}^^£f^^Q{^YDEALL0CATI0N'*"*'*'''‘**'''*''"*'"'*'*'*“*"*'****'**'''******'* 

sold free_sweep_ILst(SLIST) 

SWEEP LINK ‘SLIST: 

{ 

SWEEP_LINK *TRASH = SLIST; 

while (TRASH) { 

SLIST=SLIST->NEXT; 
free (TRASH); 

TRASH = SLIST; 

} 

} /* end free_sweep_Iist */ 


void free cIistICLIST) 

CONSIDERED HEAD *CLIST; 

{ 

CONSIDERED_LINK *NEXT_CL=CLIST- > LINKS,»TRASH; 


while (NEXT CL) { 

TRASH = NEXT_CL; 

NEXT_CL=NEXT_CL- > NEXT; 
freefTRASH); 

} 

free(CLIST); 

} /• end free_clisl •/ 






/**»****♦**•*♦+*♦♦♦**♦ *****vp|spLAyp(jf»JCXlONS**'*"'"*‘**************** ********** 

NOTE: These functions were used in debugging, but they have been left 
in case inspection of intermediate results is needed in the future.*/ 


void priuf_l(L) 

LINE *L; 

{ 

printf("\n\nline; XI = 51.21f Y1 = % .21f Z1 = .21f "X->Xl.L-> Y1,L->Z1): 

printfC\n X2= 51.2lf Y2= 51.21f Z2= 5? .21f \n".L- >X2.L->Y2.L->Z2); 
fflushfstdout); 

} 


void priiit_Ui.stXIST) 

LINE HEAD *LIST; 

{ 

LINE *NEXT_L=LIST->VLINE_LIST; 

printf(“\n\n\nVertical lines (',?d) are:\n\n"XIST->VERT_LINES); 
while (NEXT_L) { 

print_l(NEXT_L); 

NEXT_L = NEXT_L- > NEXT: 

} 

printf("\n\n\nnon-vertical lines (5fd) are:'n\n".LIST-> LINES): 
fflush(.sldout): 

NE.XT_L= LIST- > LINE_LIST: 
while (NEXT_L) { 

printJ(NEXT_L); 

NECT L=NEXT_L->NEX'T: 

} 

} 

void priut_sl(SL) 

SWEEP_LINK *SL: 

< 

printf("\nSL: X= 5? .21f Y= '.f .2lf Z= <? .2ir,SL- >X.SL- > Y,SL->Z); 
printf('\n THETA=5?.201fDIST=‘?.2ir. gs(SL->THETA).SL->DIST): 
printf("\n MIN_Z= 5f .21f MAX_Z= 55 .211'. 

degsfSL- >MIN_Z).degs(SL- >M/>lX_Z)): 
if (SL->PREV==NULL) 

printf("\nWaming no previous link"); 
if (SL- > NEXT = = NULL) 

printfCWarning should be last link"): 
fnush(stdout): 

} /* end print_sl*/ 


void priut_slist(SL) 

SWEEP_LINK *SL; 

{ 

SWEEP_LINK *NEXT_SL = SL; 

printf("\n\nSWEEP LIST:\n\n"); 
while (NEXT_SL) { 

print_sl(NEXT_SL); 

NEXT_SL=NEXTSL-> NEXT: 

} 

) 
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void priut_cl(CL) 

CONSIDERED_LINK *CL; 

{ 


prinlfC\n\n MIN_Z= .21f MAX_Z= 5f .211'. 

degs(CL- >MlN_Z),degs(CL- >MAX_Z)); 
printfC\n\n NEW_MIN_Z=!? .21f NEW_MAX_Z= S? .2ir, 
degs(CL- > NEW_MlN_Z).degs(CL- > NEW_MAX_Z)); 
prinlf("\n MIN_SWEEP= « .2If DIST=^?.2ir, 
degs(CL- > MIN_SWEEP),CL- > DIST); 
printfC\nUPPER_Z: % .2ir.CL- > UPPERZ); 

printf("\nOLD: VISIBLE= %i B_V1S1BLE= %d",CL- >VISIBILITY.CL- >B VISIBILITY): 
printfC\nNEW; VlS!BLE=91d B~ VIS1BLE= 5?d', 

CL- > NEW VISIBILITY.CL- > NEW B_VIS1BILITY); 
prinl_sl(CL- >SL1); 
prinl_sl(CL- > SL2); 

} /• end print_cl */ 


void priut_cllst(CLiST) 

CONSIDEREDHEAD ‘CLIST; 

{ 

CONSIDERED_LINK *CL=CLIST- > LINKS; 

printfC\n\nConsidered list (THETA= 'i .210:\n\n".degs{THETA)); 
while (CL) { 

prim_cl(CL); 

CL = CL->NEXT; 

> 

} /• end print_clist •/ 


/• Sweep links are added to the list in order of their THETA values*/ 

SWEEP_LINK •add_sweep_liiik(LIST.LINK) 

SWEEP_LrNK ‘LIST, ‘LINK; 

{ 

SWEEP_L1NK ‘TEMP; 

if (LIST) { 

TEMP=LIST; 

if (TEMP->THETA> LINK->THETA) { 

LINK-> NEXT = LIST; 

LIST=LINK: /• inserted as 1st element */ 

} 

else { 

while ((TEMP- > NEXT)&&(TEMP- > NEXT- >THETA < = LINK- > THETA)) { 
TEMP=TEMP-> NEXT: 

} 

LINK- > NEXT=TEMP- > NEXT; 

TEMP-> NEXT = LINK; 

} /* end else */ 

} /• end if */ 
else 

LIST=LINK; /• is first element to add to list */ 
return LIST: 

} /• end add_sweep_link */ 
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/* This function scans through the entire world model (W). A sweep link is 
made for each vertex of the model. The angle from the observer (global 
variable) to the vertex is calculated and used to son the links. 

When a link is made, we also inspect its ->VERT_EDGE pointer to see 
if a venical line leaves it. Calculate_z_coverage uses the height of 
this vertical line to determine coverage of tlie vertex along the z-axis. 

Each sweep link has its PREV pointer assigned to indicate the link 
which preceeded it in the polygon list. In latter processing only sweep 
links with a ccw relationship to this PREV link will be considered as 
visible. 

Since we will latter require all floors residing above the observer and 
all ceiling below them to be visible, we inspect each polygon for these 
properties. When a polygon satifles one of these, it's vertices are 
processed a second time in reverse order. This ensures that every edge 
of the polygon will swho up as a ccw CONSlDERED_LlNK. 

*/ 


SWEEP_LINK *iuake sweep_lisf(W) 

WORLD *W; 

{ 

SWEEP LINK *SWEEP_LIST=NULL.''NEXT_L.*LAST_L,*FIRST_L; 

POLYHEDRON *NEXT_PH. 

POLYGON •NEXT PG; 

VERTEX •NEXT_V. *LAST_V; 

INSTANCE ‘NEXT I. *LASTJ; 

NEXT_PH = W- > POLYHEDRON_LlST: 
while (NEXT_PH) { 

NEXT_1=NEXTPH- > INSTANCE_L1ST; 
while (NEXT_I) {” 

NEXT_PG = NEXT_PH- > POLYGON_LIST; 
while (NEXT_PG) { 

NEXT_V ="nEXT_PG- > VERTEX_LIST; 

NEXT"L=make_rwecr_link(NExf_PH.NEXT_PG.NEXT V.NEXT I. 

NECT_PG->Z_VALUE); ' 

SWEEP_LIST=add_sweep_link(SWEEP LIST7NEXT_L);/*make and add links*/ 

FIRST_L = NEXT_L; 

LAST_L=NEXt1.; 

NEXT^V = NEXT_V. > NEXT; 
while ^EXT_V) { 

NEXT_L=make_sweepJink(NEXT_PH.NEXT_PG.NEXT_V.NEXT_l. 

NEXT_PG- > Z_VALUE); 

NEXT_L- > PREV = LAST_L; 

SWEEPLIST = add_,sweep_link(SWEEP_LlST.NEXT_L); 

LAST_L=NEXT_L; 

NEXT_V = NEXT_V- > NEXT; 

} /* end while */ 

FIRST_L- > PREV = LAST_L; /• add line which closes polygon */ 

/♦ Make entire polygon ccw so it may be visible */ 

if ((((NEXT_PG- > Z_VALUE + NEXT !- > Z < Z)&&(NEXT_PG- > FLOOR = = 0)) 11 

(fl<EXT_PG- > Z_V ALUE+ NEXTJ- > Z > Z)&&(NEXT_PG- > FLOOR = = !))) 
((NEXT_PH- > OBSTACLE = = 0)&&(N EXT_PG- > FLOOR = = 0))) { 
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/• To cut down on processing time the above if statement can be commented 
out and the below one used. Thi.-' has the effect of assuming a model 
is composed of only large objects (observer doesn't look down or up to them). 

We still must make enclosure ceiling visible since items such as door jam 
ceilings will not always be above the observe*/ 

/* if ((NEXT_PH- > OBSTACLE = =0)&&(NEXT_PG- >FLOOR= =0))(*/ 

NEXT_V = NEXT_PC- > VERTEX_LIST; 

NEXT_L=make_sweep_link(NEXT_PH,NEXT_PG.NEXT_V.NEXT_l. 

NEXTPG- > Z_VALUE); 

if (!((NEXT_PH- >OBSTACLE= =0)&&(NEXT_PG- >FLOOR= =0))){ 
NEXT_L->MAX_2 = NEXT_L->MIN_Z;/»Mke away height if any*/ 
NEXT^L-> CEILINGS == NULL; 

NEXT_L-> UPPER Z = NEXT_L->Z. 

) 

FIRST_L=NEXT_L; 

NEXT_V = NEXTV- > NEXT: 
while (NEXT_V) { 

LAST_L=make_sweep_link(NEXT_PH.NEXT_PG,NEXT_V.NEXT_I. 

NEXT_PG- > Z_VALUE); 

if (!((NEXT_PH- >OBSTACLE= =0)&&(NEXT_PG- >FLOOR = =0))){ 

LAST_L->MAX_Z = LAST_L->MIN_Z./*take away height if any*/ 
LAST_L-> CEILINGS == NULL; 

LAST_L- > UPPER_Z = LAST_L- >Z; 

} 

NEXT_L- > PREV = LAST_L; 

SWEEP_LIST=add_sweep_link(SWEEP_LIST.NEXT_L); 

NEXT_L=LAST_L; 

NEXT_V = NExf V->NEXT; 

} 

NEXT_L- > PREV = FIRST_L; 

SWEEP LIST = add_sweep link(SWEEP LIST.NEXT_L); 

1 ' 

NEXT PG = NEXT_PG->NEXT; 

) /* end while NEXT_PG*/ 

NEXT_I=NEXT_I- > NEXT; 

} /* end whiPe NEXT_r•/ 

NEXT_PH = NEXT_PH- > NEXT; 

} /* end while NEXT_PH */ 
return SWEEP_LIST; 

} /* end make_sweep_lisl */ 


A-26 





/* Searches considered list (CL), if sweep link (SLINK) is the 2nd endpoint 
of an edge, that edge is returned to complete its processing. If no 
match is found a null pointer is returned*/ 

CONSIDERED_LI\K *iuider_cousideraliou(SLINK.CL) 

SWEEP LINK 'SLINK; 

CONSIDERED_HEAD *CL; 

{ 

CONSIDERED_LINK *NEXT_CL = CL->LINKS; 

while (NEXT_CL) { 
if (NEXT_CL->SL1 = = NULL) 

printfC\nWaming CL with no SLl “); 
if (NEXT_CL- > SL2 = = NULL) 

printf("\nWaming CL with no SL2"); 
if (NEXT CL- >SL2= =SLINK){ 

return NEXT CL; /• reirun ptr if in li.st*/ 


else 

NEXT_CL = NEXT_CL- > NEXT; 

} 

return NEXT_CL; /* returns NULL if not in list */ 

} /* end under_consideration ♦/ 


/* Determine the point of intersection along CL's edge which occurs with 
the ray originating from the observer's position (X.Y.Z) along ANGLE. 

The distance to this intersection ios also calculated. 

NOTE: Intersection and distance are returned by reference in variable 
addresses INT_X.INT_Y and DIST. 

It is assumed an intersection does take place (dictated by usage 
in algorithm).*/ 

void line_ra>_iii(ersection(CL,ANGLE.INT X,INT ^'.DIST) 

CONSIDERED_LINK *CL; 

double ANGLe7*INT X.'INT Y.'DIST; 

{ 

double XX.YY; /'values at intersection */ 
double dx.dy; /'delta values*/ 
double M_LINE,M_RAY; /'slope of line and ray*/ 
double B_LINE,B_RAY: /*y-intercepts*/ 

dy = CL->SL2-> Y-CL->SLI-> Y. 
dx=CL->SL2->X-CL->SLI->X; 

if ((ANGLE= =CL- > SLl - >THETA)&&(ANGLE= =CL- >SL2- >THETA)) { 
if (CL- > SL1 - > DIST < = CL- > SL2- > DIST) { 

XX=CL->SL1->X; 

YY = CL->SLI->Y; 

•DIST = CL- > SL 1 - > DIST; 

} 

else { /'colinear cases*/ 

XX=CL->SL2->X; 

YY-CL->SL2->Y; 

•DIST=CL- > SL2- > DIST; 

> 

} 

else { 

if ((ANGLE*= =90.0) | | (ANGLE = = 180.0)) { /'ray has no slope*/ 

XX = X; 

M_LINE=dy/dx; 
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VY»M UNE*XX + (CL- >SLl- > Y-(M_LINE*CL->SL1 - >X)); 

} 

else { 

M_RAY = Un(ANGLE); 

B_RAY = Y-M_RAY*X; 

if (CL- > SLl - > X = = CL- > SL2- > X) { /‘line has nol slope */ 

XX = CL->SL1->X; 

YY=M_RAY*XX-t-B_RAY; 

} 

else { /* both line and ray have a si<^e */ 

M_LlNE=dy/dx; 

B_LINE=CL- > SLl - > Y-M_LINE*CL- > SLl - >X: 

XX = (B_LINE-B_RAY)/(M_RA Y-M_L1NE); 
YY=M_RAY*XX-t-B_RAy; 

} /• end else */ 

} /• end else •/ 

*DIST=trunc(sqrt(pow(XX-X,2.0)-t-pow(YY-Y,2.0))); /^assign distance*/ 

} /* end else •/ 

*INT_X=lninc(XX); /‘assign x-y coordinates of intersection*/ 
*INT_Y=trunc(YY); 

) /* end line_ray_intersection */ 


/* Searches currently accepted lines. If L duplicates one of these, a I is 
returned. Duplications will naturally occure since each vertical line is 
common to 2 edges. •/ 

ini dupUcate_vert_liue(L,LlST) 

LINE ‘L; 

LINE HEAD ‘LIST; 

{ 

int DUP=0; 

LINE *NEXT_L=L1ST->VLINE_LIST; 
while (NEXT_L) { 

if ("(L- > X1 = = NEXT_L- > X1 )&&(L- > Y1 = = NEXT_L- > Y1 )&4S: 

(L- >ZI = =NEXT_L- >Z1)&&(L->Z2= = NEXT_L- >Z2)) 
DUP=1; 

NEXT L=NEXT_L->NEXT; 

> 

return DUP; 

} /* end duplicate_vert_line */ 


void add_vert_line(CL,SL,LIST) 

CONSIDERED_LINK *CL; 

SWEEP LINK ‘SL; 

LINE_HEAD *LIST; 

{ 

LINE *NEW_LINE=(LINE •)malloc(sizeof(LINE)); 
double len; 


len-SL->DIST; 

NEW_LINE- > X1 = SL- > X; 

NEWSLINE-> Y1 = SL-> Y; 

NEWSLINE- > MODEL_X - SL- > X: 

NEWLINE- >MODEL~Y = SL- > Y; 
if (CL- > MIN_Z > = SL- > MIN_Z) 

NEW LINE->Z1 =tan(CL->MIN_Z)*len-t-Z; /‘clipped short*/ 
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else 

NEWLINE- > Z1 = tan(SL- > M^N_Z)•len-^ Z; 

NEWLINE- >X2 = SL->X; 

NEWSLINE- > Y2 = SL- > Y; 
if (CL->MAX_Z<=SL->MAX_Z) 

NEW_LlNE->Z2 = un(CL- >MAX_Z)*len-sZ; /*clipped short*/ 

else 

NEWLINE- >Z2 = lan(SL- >MAX_Z)*len-t-Z; 
NEW_LINE->NEXT=NULL; 
if (duplicate_vert line(NEW_LINE,LIST)= =0){ 

LlST->VERT_LINES-f -f; 
if (LIST->VTAIL) { 

LIST->VTAIL->NEXT=NEW_LINE;/‘add as last vert, line*/ 
LIST- > VTA1L=NEWLINE; 

} 

else { 

LIST->VTA1L=NEW_L1NE; /* Isl vertical line added */ 
LIST- > VLINE_LIST = NEWLINE; 

} 

} /* end if */ 
else 

free(NEW_LINE); 

) /* end add_vert_linc */ 


/* Adds only bottom edge of a considered link (CL). Lines are only accepted 
from their MIN_SWEEP angle to the current sweep angle (THETA).*/ 

void add_line(CL,LIST) 

~CONSIDERED_LINK *CL; 

LINE HEAD *LIST; 

{ 

LINE *NEW_LINE; 
double K.IY.DIST; 

/*DIST req for call to intersection but value not used*/ 

/•bottom line is visible and not just a single point*/ 

if ((CL- >B_VISIBILITY= = l)&&(my_abs(CL- >M!N_SWEEP-THETA) > 0.0001)){ 
NEW_LINE=(LINE*)malloc(sizeof(LlNE)); 

NEWSLINE- > NEXT = NULL; 

LIST-”^ LINES-*• + ; 
if (LIST-> TAIL) { 

LIST- >TAIL- > NEXT=NEW LINE; /* add non-vertical line*/ 
LIST- >TAIL= NEWLINE; 

} 

else { 

LIST->TAIL = NEW_LINE; /* 1st non-vertical line added */ 
LIST-> LINE LIST = NEW_LINE; 

} 

/* find first endpoint to accept*/ 

line_ray_intersection(CL.CL- > MINSWEEP.&IX.&IY.&DIST); 
NEW_LINE->XI=D<; 

NEWSLINE->YI=IY; 

NEw2lINE->ZI=CL->SLI->Z; 

/•find second endpoint*/ 

line_ray_intersection(CL,THETA,&IX,&IY.&DIST); 

NEW_LINE->X2 = IX; 

NEWSLINE->Y2 = IY; 

NEWSLINE- > Z2 = CL- > SL2- > Z; 

} /*endif*/" 

CL- >MIN_SWEEP=THETA; 

} /* end add_line */ 
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/* This function calculates distances from the observer along the current 
THETA to each edge on the considered list. Distances do not account for 
z infromation (height), but reflect straight line distance to the 
intersection lying in the x-y plane. */ 

void calculai«_distaiices(CLIST) 

CONSIDEREDHEAD *CLIST. 

{ 

CONSIDERED_LINK •NEXT_CL=CLIST- > LINKS; 
double K.IY; /*pointers and values at intersection •/ 
double DIST; /*distance to intersection values*/ 

while (NEXT_CL) { 

line_ray_intersection(NEXT_CL,THETA,&K,&IY,&DIST); 
NEXT_CL- > DIST=DIST; 

NEXT_CL=NEXT_CL- > NEXT; 

} /* end while */ 

} /* end calculate_distances */ 


/* When a link is put on the considered list, we must determine how much of 
it is blocked from view (along the z axis) and what affect it has on 
more distant edges. 

Notice that case 2 is not accounted for since we are dealing with a 
wire frame representation.*/ 

void calculiite_visibility_add(CLINK,CLIST,LLIST) 

CONSlDERED_LINK *CLINK; 

CONSIDERED~HEAD *CLIST; 

LINE HEAD’LLIST; 

{ 

CONSIDERED_LINK *CL=CLINK- > NEXT; 
int TYPE_OCCLUSION; 

if (CLINK-> NEW VlSlBILfTY = = 1) { /*if visible it may occlude others*/ 
while (CL) { 

if (CL- >NEW_VISlBlLrrY = = I) { /*can only block visible lines*/ 
TYPlE_OCCLUSION=occlusion(CLINK.CL); 


switch (TYPE_C)CCLUS10N) { 

case 4: /*totally occluded*/ 

CL- > NEWVISIBlLfTY^O; 

CL- > NEw”B_VlSlBILrrY =0; 
break; 

case 3; /*bottom occluded*/ 

CL- > NEW B_VISlBILrrY=0; 

CL- > NEW~MIN_Z=CHNK- >NEW_MAX_Z; 
break; 


/* case 2: 

CL- > NEW_MIN_Z=CLINK- > NEW M/VX_Z; 
break; 

*/ case 1: /‘top occluded*/ 

CL->NEW_MAX_Z«CL1NK->NEW_MIN_Z; 

break; 

} /‘end switch*/ 

> /*endif*/ 

CL«CL->NEXT; 

} /• end while */ 

} /• end if */ 

} /* end calculate_vitibility_add */ 
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/* Calculate the visibility of the vertical edge (if any) residing on the 

2nd endpoint of a link which is being passed by the su eep (thus removed 
from the considered list)*/ 


void cak_vis_reiuove(CL.CLIST) 

CONSIDERED_LINK *CL; 

CONSIDERED_HEAD *CLIST; 

{ 

CONSIDERED_LlNK *NEXT_CL = CLIST- > LINKS: 
ini TYPE_OCCLUSION; 

/*now calc visibility bounds of SL2's vertical line if there is one*/ 
if (CL- > SL2- > V- > VERT_EDGE) { 

while ((CL! = NEXT_CL)&&(CL- > NEW VISIBILITY = = !)){ 

if (CL-> SL2- > THETA = =NEXT_CL->SLI - >THETA) 
TYPE_OCCLUSION = 0; 
else 

TYPE_OCCLUSION = occlusion{NEXT_CL.CL); 
switch aYPE OCCLUSION) { 
case 4: 

CL-> N EWVISIBILIT V = 0; 
break: 
case 3: case 2: 

, CL- > NEW_MIN_Z = NEXTCL- > NEWMAXZ: 

break: 

case I: /*top of B occluded*/ 

CL- >NEW_MAX_Z = NEXT_CL- >NEW_M1N_Z: 
break: 

) /‘end switch*/ 

NEXT_CL= NEXT_CL- > NEXT: 

} /* end while •/ 

CL- > VISIBILFTY = CL- > NEWVISIBILITY: 

CL- > M1N_Z=CL- > NEW jvllN_Z: 

CL- > M AX_Z = CL- > NEV.'_M AX_Z: 

} /• end if •/ 
else 

CL-> VISIBILITY = 0: 

} /• end calc_vis_rcmove */ 


/* If visibility has been altered from last time, we must accept lines which 
were already visible and reset the value of M1N_SWEEP to reflect where along 
the edge these new values start.*/ 

iut vi$ibiiily_cbaiiges(CL) 

CONSIDERED_LINK *CL: 

{ 

int CHANGES = 0: 

double EXP_MIN_Z. EXP_MAX_Z: /‘expected coverage based on perspective*/ 

EXP_MIN_Z*ttunc(atan((CL- >SLI - > Z-Z)/CL- > DIST)): 
EXP_MAX_Z=trunc(atan((CL- > UPPER_Z-Z)/CL- > DIST)): 

if (CL- > VISIBILITY! = CL- > NEW^VISIBILITY) 

CHANGES-t--I-; 

if (CL- > B.VISrBILITY! - CL- > NEW_B_VISIBILITY) 

CHANGES-I-+; 

if (EXP_MIN_Z!=CL- > NEW_MIN_Z) 

CH'aNGES+ + : 

if (EXP_MAX_Z!=CL- > NEW_MAX_Z) 

CHANGES+-I-; 
return CHANGES: 

} 
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void ttpda(e_Tisibility(CLIST,LLIST) 

cbNSIDERED_HEAD ’CLIST; 

UNE_HEAD *Ll1ST; 

{ 

CONSIDERED_LlNK •CL=CUST- > LINKS; 
while (CL) { 

if (visibilily_changes(CL)! = 0) { 

if ((CL- > B VISIBILITY = = 1 )&&(IN_MAIN)) 
addJinelCL.LLIST); 

CL- > VISIBILITY = CL- > NEWVISIBILITY; 

CL- > B_V1S1B1L1TY=CL- > NEWBYlSlBILfTY; 
CL->M1N_Z = CL->NEW_M1N_Z: ~ 

CL-> MAX_Z=CL-> NEW_MAX_Z; 

CL->MIn3wEEP=THETA; /‘values only affect here on*/ 


) 


CL=CL->NEXT, 


} 


/* Visibility must be periodically recomputed to account for the effects of 
perspective as the sweep progresses around 360 degrees.*/ 

void recoiiipute_visibiUty(CLlST.LLiST) 

CONilDEREDHEAD *CL1ST; 

LINE HEAD*LL1ST; 

{ 

CONSIDEREDLINK *CL=CL1ST- > LINKS. 

ealc_current_z_coverage(CLlST); /‘will change due to perspective*/ 
while (CL) { /*add each link again*/ 

ealculate_visibilily_add(CL.CLlST.LLlST); 

CL=CL">NEXTr 

) 

update_visibility(CLlST,LLlST); /*sec if changes occured*/ 

} /* end recompute_visibility */ 

/* Add a new link to the considered list (sorted by distance from observer 
in the x-y plane). If a vertical edge resides on the links ftrst endpoint 
accept it based on the edges computed visibility*/ 

void add_coiisidered_liiik(CL,CLlST,LLIST) 

CONSIDERED_LlNK *CL; 

CONSIDERED_HEAD *CL1ST; 

LINE_HEAD *LLIST; 

{ 

CONSlDERED_LlNK *NEXT_CL=CL1ST- > LINKS; 

if (CLIST- > LINKS) { /*recalc distances for insert*/ 

calculate_di8tances(CLIST); 
if (CL- >”d1ST < NEXT_CL- > DIST) { 

CL- > NEXT=CL1ST- > LINKS; 

CLIST->LINKS=CL; /*add as Isi element*/ 

} /•end if*/ 
else { 

while ((NEXT_CL- > NEXT)&&(NEXT_CL > NEXT- > DIST < CL- > DIST)) { 
NEXT CL=NEXT CL->NEXT; 

} 

/•keep ones leaning in towards camera 1st on list*/ 

while (((NEXT_CL- > NEXT)&&(NEXT_CL- > NEXT- > DIST - ■= CL- > D1ST))&& 
(ccw2(CL- >SLI .CL- >SL2.NEXT_CL->NEXT- >SL2))) { 
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NEXT CL = NEXT_CL->NEXT; 

} 

CL- > NEXT = NEXT_CL- > NEXT: 

NEXT_CL- > NEXT = CL; 

) /• end else */ 

reconipule_visibllily(CLIST.LLIST); 

} /* end if •/ 
else { 

CLIST-> LINKS = CL; /*lsl element added to null list*/ 

CL- > VISIBILITY = 1; /‘so must be visible*/ 

CL- > B VISIBILITY = 1; /*so must be visible*/ 

} 

if (aN_MAIN)&&(((CL- > VISIBILITY = = 1 )&&(CL- > MIN_Z < CL- > MAX Z)) 
&&(CL-> SLl - > V-> VERTEDGE))) 
add_vert_line(CL.CL- >SL1 .LLIST): 

} /* end add_considered_link */ 

/* Remove a CL from the list*/ 
void reuiove_cI(CL.CLIST) 

CONSIDERED_LlNK *CL; 

C0NS1DERED_HEAD *CLIST; 

C0NSIDERED_LINK*NEXT_CL=CLIST-> LINKS; 

if (CL= =NEXT_CL) { /* removing 1st link */ 

CLIST- > LINKS = NEXTCL- > NEXT; 
free(CL); /*deallocate memory*/ 

} 

else { 

while ((NEXT_CL->NEXT)&&(NEXT CL-> NEXT!=CL)) { 

NEXT CL = NEXT CL-> NEXT. 

) 

if (NEXT_CL- > NEXT) { 

NEXT_CL- > NEXT=CL- > NEXT; 
free(CL); /‘deallocate memory*/ 

) 

} /* end else */ 

) /* end remove_cl */ 

/* The sweep has progresses to the end of link CL. We need to inspect the 
visibility and accept both the bottom edge and vertical line (at 2nd 
endpoint) if required. 

Once this is done, visibility of the entire considered list (CLIST) 
must be recomputed to account for perspective and the deleted edge*/ 

void coni|ilete_liae(CL.CLIST.LLIST) 

CONSIDERED_LINK *CL; 

C0NSIDERED_HEAD *CLIST; 

LINE HEAD ‘LLIST; 

{ 

LINE *L; 

if ((CL- > VISIBILITY = = I )&&(CL- > B VISIBILITY = = I)) 
add_line(CL,LLIST): /‘also checks for and adds right vert line*/ 
calculale_distances(CLIST); 
calc_currenl_z_coverage(CLIST); 
calc_vis_remove(CL.CLlST); 

if ((CL- > SL2- > V- > VERT_EDGE)&&(CL- > VISIBILITY = = I)) 
•dd_vertJine(CL.CL- > SL2.LLIST): 

remove_cl(CL,CLIST); /*if not visible no changes needed before removal*/ 
recompute_viaibilily(CLIST,LLIST); 

) /* end complete_line */ 
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/* These occlusion codes apply if both links begin at the same vertex*/ 
int overlay_occiiision(F,B) 

CONSIDERED LINK ‘F, *B; 

{ 

int TYPE=0; /’default is no occlusion occurs*/ 
if (F- > NEW_M1N_Z < = B- > NEW_MIN_Z) { 

if (f- > NEW_M AX_Z > = B- > NEW_MAX_Z) 

TYPE=4; /* totally occluded*/ 

else { 

if (F- > NEW_MAX_Z > = B- >NEW_M1N_Z) 

TYPE=3; /’bottom of B occluded*/ 

} 

} /* end if */ 
else { 

if (F- > NEW_MAX_Z < B- > NEW_MAX_Z) 

TYPE=2; /’middle prtion of B occluded*/ 

else { 

if (F- > NEW_MIN_Z < = B- > NEWM AX_Z) 

TYPE=I; /’top of B occluded*/ 

> 

} /* end else */ 

/* otherwise there is no occlusion */ 
return TYPE; 

} /* end overlay_occlusion */ 

/* The type of occlusion imposed upon the back edge (B) by the front edge (F) 
is determined: return value is 0.1.2,3. or 4 */ 
int occlusionfF.B) 

CONSIDERED LINK ‘F. ‘B; 

{ 

int TYPE=0; /’default is no occlusion occurs*/ 

/’No occlusion if edges fall on the same plane or are end-to-end*/ 

if (((F- > SLl- >THETA= =B- > SL2- >THETA) 11 (F- > SL2- >THETa= = B- > SLl - >THETA)) 
((F- > M1N_Z= = F- > MAX_Z) 11 (colinear(F.B)))) 

TYPE=0; 
else { 

if (((F- > SL1 - > DIST = = B- > SLI - > DIST)&&(F- > SL1 - >THETA = = B- > SLl - >THETA)) 
&&(B- > UPPER_Z < 9999.0)) 

TYPE=overlay_occlusion(F. B); 

else { 

if (F- > NEW_MIN_Z< B- > NEW_MIN_Z) < 

if (F- > NEW M AX_Z > B- > NEW M AX_Z) 

TYPE=4; /* totally occluded*/ 

else { 

if (F- > NEW_MAX_Z > B- > NEW_M1N_Z) 

TYPE = 3; /’bottom of B occluded*/ 

> 

) /* end if */ 
else { 

if (F- > NEW MAX Z < B- > NEW_MAX_Z) 

TYPE=2; /’middle prtion of B occluded*/ 

else { 

if (F- > NEW_MIN_Z < B- > NEW_MAX_Z) 

TYPE= 1; /’top of B occluded*/ 

> 

} /* end else */ 

) /• end else */ 

} /* end else ♦/ 

/* otherwise there is no occlusion */ 
return TYPE; 

} /* end occlusion */ 
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/* This is Ihe primary function which will be called from outside this file. 

A list of sweep links is constructed based on the model (W) and the observer's 
position (EYE_X.EYE_Y,EYE_Z). 

Next edges straddling 0 degrees are placed on the considered list (if they 
are ccw). Then main processing begins and each sweep link and its predicessor 
pair is inspected. If the circuit from observer to SL to prev(SL) is ccw, the 
SL's are put into a considered link (CL) and added to the considered list 
(CLIST). 

As the sweep progresses throught the sweep links: visibility is updated, 
lines are accepted, and edges are removed from CLIST (as they are passed). 
OUTPUT: LINE_LIST structure pointing to 2 list of lines 

(vertical and non-vertical accepted lines) 

•/ 

LINE_HEAD *conduct_visibaity_sweep(W.EYE_X.EYE_^'.EVE_Z) 

WORLD *W. 

double EYE X.EYE Y.EYE Z; 

{ 

SWEEP_LINK *NEXT_SL. *SWEEP_LIST = NULL; 

CONSIDERED LINK ‘CL. *PAST_CL; 

CONSIDERED HEAD ’CLIST = make considered headOi 
LINE_HEAD’LINE_LIST = make_line_head(): 
im STRADDLERS = 0; 

IN_MAIN=0; /’still processing straddlers’ ' 

X = EYE_X; 

Y = EYE_Y; 

Z = EYE~Z: 

SWEEP_LIST=make_sweepJislC\V); 

NEXT_SL = SWEEP_LIST; ” 

/’ Add all visible straddlers’/ 
while (NEXT_SL) { 

THETA = NEXT_SL->THETA; 
if ((ccw(NEXT_SL.NEXT_SL- > PREV)= = 1)&& 

(NEXT_SL-'>THETA >NEXT_SL-> PREV- >THETA)) { 
CL=make_considered_link(NE.XT_SL): 
add_consideredJink(CL.CLIST.LINE_LIST); 
CL->MIN_SWEEP=0.0; 

STRADDLiRS=l; 

} 

NEXT_SL=NEXT_SL- > NEXT; 

} /• end while ’/ 

NEXT_SL=SWEEP_LIST; 

THETA=0.0; 

IN_MAIN=1; 

/’ Process all of sweep list’/ 
while (NEXT_SL) { 

THETA = N EXT_SL-> TH ETA; 

while (PAST_CL = under_consideralion(NEXT_SL.CLlST)) { 
complelcJine(PAST_CL.CLIST.LINE LIST); 

) 

if (ccw(NEXT_SL,NEXT_SL- > PREV) = = 1) { 

CL = make_considered_link(NEXT_SL): 
add_considered link(CL,CLIST.LINE_LIST); 

} 

NEXT_SL=NEXT_SL- > NEXT; 

} /• end while •/ 
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if (STRADDLERS) { /• have lines crossing ZERO degrees */ 

THETA = 0.0; 
calculale_dislances(CLIST): 

CL=CLlST-> LINKS, 
while (CL) { 

if ((CL- > VISIBILITY = = 1 )&&(CL- > B VISIBILfTY = = 1)) 
add_line(CL,LINE_LlST); 

CL=CL->NE.XT; 

} 

} /* end if */ 
free_clisl(CLIST); 
free_sweep_Iist(SWEEP_LIST); 
relum LINE LIST; 

} /* end conduct_visibility_sweep */ 
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/* 

FILE NAMErgraphics.h 
AUTHOR: Lt James Stein 

PROJECT; Thesis, supporting Yamabico-11 vision system 
Date: March 1992 

ADVISOR: Dr. Kanayama 

COMMENTS: 

This file contains the routines neccessary to support the projection of our 
2d+ model world into a 2 dimensional window. This view will then be used for 
pattern matching against the processed images extracted from the raw camera 
data. 

Two primary Junctions are provide; gel_view and get_full_view 

- get_view calls the function conduct_visibility_sweep in file "visibility.h" 
the set of output lines represents a2d projection of all lines which should be 
visible from a given position and orientation within the model w'orld. W. 

- get_full_view does not call the visibility checking function. Its output 
represents all model lines which are seen if everything in the model were 
transparent 

- The memory deallocation function free lines is provided also. The user can 
send an uneeded LINE_HEAD pointer to this function for deallocation. 


INPUT: Position in the model (PRPX.PRPY.PRPZ) 

orientation (ORIENT) with 0 degs being down the y-axis 
a world (W) 
focal length (FL) 

The view angle of the camera is calculated based upon the camera's sensin' 
element size (constant CCD) and the supplied focal length (FL). 

*/ 


/*CCD and clipping planes are in inches*/ 

#defmeCCD (2.0/3.0) 

ifdefine NEARCLIP 1.0 
#define FARCLIP .5000.0 

^define MAX_X XMAXSCREEN /*destination device (iris screen) limits*/ 
#definc MAX^Y YMAXSCREEN 

/*coordinatcs used by pattern matching*/ 

/*#define MAX X 686.0 
#define MAX_Y 486.0 

*/ 


double VIEW_ANGLE: /*width of camera's field of view in radians*/ 
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/* - ./ 

typedef struct line { 

double X1,X2,Y1.Y2.Z1.Z2: /*will hold final 2d device coordinates*/ 
double MODEL_X.MODEL_Y; /‘original coordinates.line in the model*' 
int CLIP1[6].CLIP2|61; /‘clipping codes*/ 
struct line ‘NEXT; 

) LINE; 


typedef struct line_head { /‘vertical lines kept separate from others*/ 
int LINES.VERT_L1NES; 

LINE ‘LINE_LIST,‘VLINE_LIST. ‘TAIL.‘VTAIL; 

} LINE HEAD; 


typedef struct window { /* surface on which to project visible lines*/ 

double XMIN, XMAX, YMIN. YM/OC. 

ZMIN, ZMAX; 

} WINDOW; 


/‘ORIENTATION within a world: 

Y 

0 


-X 90 


-90 X 


180 

-Y 


NOTE: sin and cos functions use radians as input 

*/ 


/* this function resides in file: visibility.h*/ 

LI\E_HEAD *coadiJCt_nsibility_$u'«ep(WORLD*,doiibl«.double,<ioub]e); 
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The following display funclions were used in debugging. They have been 
left here to aid in future inspection of variables*/ 

void display_wiiidoH(W) 

WINDOW *W; 

{ 

int DUMMY; 

printf("\n\nWindow limits calculated: ’); 

printf('\nX: ?? .21f-« .21AnY: .21f-^? .21AnZ; %.21f-« .2lAn\n". 

W->XMIN,W->XMAX,W->YMIN.W->YMAX.W->ZMIN.W->ZMAX) 

fflush(stdout); 

printf("\n\nEnter a number to continue'): 

} 

void lpriut_l(L) 

LINE •L; 

{ 

printfc\n\nline: XI = ^ .2lf Y1 = ?? .2lf Z1 = S? .21f'.L->X1 .L-> Y1X->Z1); 
primf("\n X2= % .21f Y2= .21f Z2 = .21f \n'X- >X2X- > Y2X- > Z2); 
fnush(stdout): 

} 


void lpriut_Ulst(LIST) 

LINE HEAD *LIST. 

{ 

LINE •NEXT_L = L1ST- > VLINE_LIST; 

printf("\n\n\nVertical lines (%d) are:\n\n"XIST-> VERT LINES); 
while (NEXT_L) { 

lprrnl_l(NEXT_L); 

NEXT L=NEXT L->NEXT, 

} 

printf('\n\n\nnon-vertical lines (/?d) are:\n\n"XIST-> LINES); 
ff1ush($tdoul); 

NEXT_L = LIST- > LINE_LIST; 
while ^EXT_L) { 

lprintJ(NEXT_L); 

NEXT L = NEXT_L->NEXT; 

} 

} 


void pruit_liiie(L) 

LINE *L; 

{ 

printf('\nX 1:% .41f Y1:.4lf ZI:% .4lf X2:91.4lf Y2;?? .4lf Z2:?? .4lf 
L->XIX->Y1X->ZIX->X2X->Y2X->Z2); 

} /• end print_Iine •/ 

void prinlJine_lisl{LH) 

~L1NE_HEAD ‘LH; 

< 

LINE *NEXT_L: 

NEXT_L=LH- > LINE_LIST: 
prinlf(”\n\nThere are %d lines: \n\n"XH->LINES); 
while (NEXT_L) { 

print_line(NEXT_L); 

NE)a_L=NEXT_L- > NEXT; 


} 


A-39 



/■ 


/ 


/* Determines absolute values for doubles. *! 

double ni.vabs(X) 
double X; 

{ 

if (X<0.0) 

X=0.0-X; 
return X; 

} 


/• Find what z coordinate of the vertex, V, from the model */ 
float fiiid_ 2 (PII,V) 

POLYHEDRON ‘PH; /‘parent polyhedron*/ 

VERTEX ‘V; 

{ 

POLYGON *NEXT_PG; 

VERTEX •NEXT_V; 
float Z_VALUE=66.6; 
int FOUND=0.PG_CNT = 0; 


NEXT_PG = PH- > POLYGON_LIST; 

while ((NEXT_PG)&&(FOUND= =0)) { /‘loop until parent polygon is found*/ 
PG_CNT+ + ; 

N^T_V = NEXT_PG- > VERTEX_LIST; 

while (^EXT_V)&&(FOUND= =0)) { /‘loop until we find the vertex*/ 
if (NEXT_V=’=V) { 

Z_V ALUE=NEXT_PG-> Z_V ALUE; 

FOUND=l; 

) 

NEXT_V = NEXT_V- > NEXT; 

} /* end while */ 

NEXT_PG = NEXTPG- > NEXT; 

} /* end while */ 

return (Z_VALUE); /‘return the z height of V*/ 

} /* end fmd_z */ 

/* calculate where the viewing window lies in model coordinates*/ 

WINDOW •calc_window(X.Y.Z.ORIENT,FOCAL_LEN) 

double X,Y.Z,ORIENT.FOCAL_LEN; 

{ 

WINDOW ‘WIN; 
double HYP; 

WlN = (WINDOW *)malloc(sizeof{WINDOW)); 

HYP = FOCAL_LEN/cos(VlEW_ANGLE/2.0); 

WIN->YMIN = Y + cos(90.0*PI/180.0-ORIENT-VIEW_ANGLE/2.0)‘ HYP. 
WIN->YMAX « y+sin(ORJENT-VIEW_ANGLE/2.0)‘ HYP; 
WIN->XMIN = X + sin(90.0*PI/180.0-ORlENT-VIEW_ANGLE/2.0)‘ HYP; 
WIN->XMAX = X+co 8(ORIENT-VIEW_ANGLE/2.0)‘ HYP; 
WiN->ZMIN = Z-CCD/2.0; 

WIN->ZMAX = Z+CCD/2.0; 
return WIN; 

) /• end calc_window */ 
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/* Deallocate the memory uses in a line list*/ 


void free_Iines(Ll]) 

LINE HEAD *LH; 

{ 

LINE •NEXT_L, *TRASH; /*TRASH is temporary variable for freeing*/ 


NEXT_L=LH- > LINE_LIST; 
while (NEXT_L) { 

TRASH = NEXT_L; 

NEXT_L=NEXT_L- > NEXT; 
free (TRASH); 

} 

NEXT_L=LH- >VLINE_LIST; 
while ff4EXT_L) { 

TRASH = NEXT_L; 

NEXT_L=NEXT_L- > NEXT; 
free(TRASH); 

} 

free(LH): /* free parent structure */ 

} /* end freejines */ 


LINE_HEAD *create_liue_head() 

< 

LINE_HEAD *LH; 

if ((LH = (LINE_HEAD •)malloc(sizeof(LINE_HEAD)))= ==NULL) 
printf("\n\ncannol create line head\n"); 

LH-> LINES = 0; 

LH->LINE_LIST = NULL; 

LH->TAIL = NULL; 
return LH; 

} /• end create_line_head •/ 

/• Called by get_fijll_view to pull lines from the 2d+ model*/ 

LINE *make_line(I.Vl,V2,Z1.2^) 

InItANCE *I; 

VERTEX *V1, *V2; 
double ZI.Z2; 

{ 

LINE *NEW_LINE; 

double LOCAL_X.LOCAL_Y, ROT_X.ROT_Y. RADS; 


NEW LINE = (LINE *)malloc(sizeof(LINE)); 
NEW_LINE->NEXT = NULL; 


/* adjust all local coordinates to pivot point*/ 
LOCAL_X = V1->X - I->PIVOT_X; 
LOCAL_Y = V1->Y - I->PrVOT_Y; 


/* rotate about the z axis */ 

RADS = I-> ROTATION • PI / 180.0 ; /* convert degs to rads */ 
ROT_X = (co8(RADS)*LOCAL_X) + (iin(RADS)*LOCAL_Y); 
ROTY = (co8(RADS)*LOCAL~Y)-(sin(RADS)*LOCAL_X); 

/* translate to proper position in world model */ 

NEW_LINE->XI = I->X + ROT_X; 

NEW_LINE->Y1 = I->Y + ROT_Y; 

NEw“lINE->Z 1 = I->Z + Zl; 
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/* calc second vertex */ 

LOCAL X » V2->X - I->PrvOT_X; 

LOCAl'y = V2->Y - !->PIVOT_Y; 

/* rotate about the z axis */ 

RADS = I-> ROTATION * PI / 180.0 ; /• convert degs to rads •/ 
ROT_X = (cos(RADS)*LOCAL_X) + (sin(RADS)*LOCAL_Y); 
ROT_Y = (cos(RADS)*LOCAL_Y)-(sin(RADS)*LOCAL_X). 

/• translate to proper position in world model */ 

NEW_LINE->X2 = I->X + ROTX; 

NEW_L1NE->Y2 = I->Y + ROT_Y; 

NEW_LINE->Z2 = 1->Z + Z2. 

return NEW_L1NE; 

} /• end makejine •/ 


void add_Iines(LIST,L) 

LINE_HEAD ‘LIST; 

LINE ‘L; 

{ 

LINE *NEXT_LINE; 

if (LIST->LINE_LIST= = NULL) { /’add Isl line to empl\ list*/ 
LIST- > LINeJlIST = L. 

LIST->TAIL=L; 

LIST->LINES = 1; 

} 

else { /*add to end of existing list*/ 

LIST->TAlL-> NEXT = L; 

LIST-> LINES -I--H; 

LIST->TAIL = L; 

} 

} /• end add_lines */ 


void scaIe_Iine(L,SX.SY.SZ) 

LINE *L, 
double SX.SY.SZ; 

{ 

L->X1 = L->X1 * SX 
L->X2 - L->X2 • SX 
L->Y1 « L->Y1 • SY 
L->Y2 = L->Y2 * SY 
L->Z1 = L->Z1 * SZ : 
L->Z2 = L->Z2 * SZ ; 
) /* end scale_line •/ 


A-42 









void scale_u'mdow(W,SX,SY,SZ) 


WINDOW *W; 
double SX.SY.SZ; 

{ 

W->XMIN = W->XMIN • SX ; 
W->XMAX = W->XMAX * SX : 
W->YMIN = W->YM1N • SY : 
W->YMAX = W->YMAX • SY ; 
W->ZMIN = W->ZMIN • SZ : 
W->ZMAX = W->ZMAX • SZ ; 
) /* end scale_line •/ 


/* shift from world coordinates to machine coordinates */ 

void $hift_coord_Iiue(L) 

LINE ‘L; 

{ 

double TEMPI. TEMP2; 

TEMPI = L->Z1; 

TEMP2 = L->Z2. 

L->ZI = L->X1; 

L->Z2 = L->X2. 

L->X1 = L->Y1; 

L->X2 = L->Y2; 

L->Y1 = TEMPI; 

L->Y2 = TEMP2. 

} /• end shift_coord_line •/ 


/• shift from world coordinates to machine coordinates •/ 

void shifl_coord_window(W) 

WINDOW ‘W; 

{ 

double TEMPI. TEMP2; 

/* Z = X Y = Z X = Y */ 

TEMPI = W->ZMIN; 

TEMP2 = W->ZMAX; 

W->ZMIN » W->XMIN; 

W->ZMAX = W->XMAX; 

W->XM1N - W->YM1N; 

W->XMAX = W->YMAX; 

W->YMIN = TEMPI; 

W->YMAX » TEMP2; 

} /* end shift_coord_window •/ 





/* translates a line to reflect a new origin (X,Y,Z) */ 

void traiislate_liDe(L,X.Y,Z) 

LINE ‘L; 
double X,Y,Z; 

L->X1 += X; 

L->X2 += X; 

L->Y1 += Y; 

L->Y2 += Y; 

L->Z1 += Z; 

L->Z2 += Z; 

} /* END TRANSLATE_LINE •/ 


/* translates a window to reflect a new origin (X.Y.Z) */ 

void transIate_window(W.X.Y.Z) 

WINDOW *W; 
double X,Y,Z; 

{ 

W->XMIN += X; 

W->XMAX += X: 

W->YMIN += Y; 

W->YMAX += Y; 

W->ZMIN += Z. 

W->ZMAX += Z: 

} (* END TRANSLATE_WINDOW •/ 


/* rotate about the vertical axis */ 

void rot_z(L.ORIENT) 

LINE *L: 
double ORIENT; 

{ 

double XI =L->X1. 

X2 = L->X2. 
YI=L->Y1. 

Y2 = L->Y2; 


L->XI - Xl*cos(ORIENT)-Yl*sin(ORIENT); 
L->X2 « X2»cos(ORIENT)-Y2*8in(ORIENT); 
L->Y1 = Yl»cos(ORIENT)+Xl»sin(ORIENT); 
L->Y2 = Y2*co$(ORlENT)+X2*sin(ORIENT); 

> /* end rot_z •/ 
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/* rotale the window about the vertical axis */ 


void rot_vvindow(\V,ORIENT) 

WINDOW *W; 
double ORIENT, 

< 

double XMIN = W->XM1N, 

XMAX = W->XMAX. 
yMIN = W->YMlN, 
YMAX = W->YMAX; 


W->XMIN = XMIN*cos(ORIENT)-YMIN»sin(OR!ENT); 
W->XMAX = XMAX*cos(ORIENT)-YMAX*sin(ORIENT); 
W->YMIN = YMIN»cos(ORlENT)+XMIN*sin(ORIENT); 
W->YMAX = YMAX*cos(ORIENT) + XMAX*sin(ORIENT); 


) /* end rot _2 */ 


/* adjust size of line to reflect change in size due to 
distance from the viewing window's plane*' 

void pen>p«ctive_traiisfnnu(L.ZMIN) 

LINE ‘L; 
double ZMIN: 

{ 

double W1 = L- > Z1 /ZMIN .W2 = L- > Z2/ZMIN; 

if(WI! = 0.0) { 

L->X1=L->X1/W1; 

L->Yl=L->Yirwi. 

L->Z1=L->ZIAVI; 

} 

else 

prinlf(''\nERROR — tried to divide by W1 =0\n"): 
if (W2! = 0.0) { 

L >X2 = L->X2/W2; 

L->Y2 = L->Y2/W2. 

L->Z2 = L->Z2/W2; 

) 

else 

printfCVnERROR — tried to divide by W2=0\n"); 
} /• end perspective_lransform •/ 
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/* Calculate the clipping codes for line L. */ 


void get_clippiiig_codes(L,ZMlN) 

LInI ‘L; 
double ZMIN: 

{ 

ini i; 

for (i=0;i< =5;+ +i) { 

L->CUPl(i) = 0; 

L->CLIP2Ii] = 0; 

} 

if (L->Y1 >-L->Zl) 

L->CLIP1(0J=1; 
if (L->Y1 <L->Z1) 

L->CL1P1(11=1; 

if(L->XI>-L->ZI) 

L->CL1P1[2)=I; 
if (L->X1 <L->ZI) 

L->CL1P113]=1: 
if (L->Z1<-I.0) 

L->CUP1[4] = 1; 
if (L->ZI >ZM1N) 

L->CL1PI15]=1; 
if (L->Y2>-L->Z2) 

L->CL1P2101=I; 
if (L->Y2<L->Z2) 

L->CL1P2[I)=1; 
if (L->X2>-L->Z2) 

L->CLIP2[2| = 1; 
if (L->X2<L->Z2) 

L->CLIP2(3)=I: 
if (L->Z2<-I.O) 

L->CL1P214|=I; 
if (L->Z2>ZM1N) 

L->CLIP2(5)=1; 

} /* end gct_elipping_codes 

/* dipt will determine new increments (TE and TL) along line 
being clipped */ 

void cUptlNUM.DENOM.TE.TL) 
double NUM, DENOM. 
double •TE, •TL; 

< 

double t; 

if (DENOM < 0.0) { 
t=NUM/DENOM; 
if (t>^TL) 
l = t; 
else 

if (t>^TE) 

•TE=t; 

} 

if (DENOM >0.0) { 
t-NUM/DENOM; 
if (t < •TE) 
l=t; 
else 

if (t<^TL) 
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*TL=t; 

) 

} /• end clipl •/ 

/* Parametric equations of line are used to clip it against the 
canonical view volume*/ 

void clip_liue(L.ZMI\) 

LINE *L; 
double ZMIN; 

{ 

double dx. dy, dz; 

double TMIN = 0.0, TMAX= 1.0; 


dx = L->X2-L->Xl; 
dy = L->Y2-L->Yl; 
dz = L->Z2-L->Zl; 


clipt((-L->Xl-L->Zl),(dx+dz).&TMIN,&TMAX); 
clipt((L- > X1 -L- > Z1 ),(-dx + dz).&TMIN.&TM AX); 
clipt({L->Yl-L->Zl),(-dy + dz).&TMIN.&TMAX); 
clipt((-L->Yl-L->Zl).(dy + dz).&TMIN,&TMAX); 
clipl((-L->Zl+ZMlN),(dz).&TMIN.&TMAX); 
clipt((-L- > Z1 -1 ),(-dz).&TMIN,&TM AX); 
if (TMAX < 1) { /* endpoint adjusted */ 

L->X2 = L->X1 + (TMAX’dx); 

L->Y2 = L->Y1 + aMAX’dy); 

L->Z2 = L->Z1 + (TMAX*dz); 

} /• endpoint ad' isied •/ 

if (TMIN>0) { 

L->X1 = L->X1 + (TMIN'd 
L->Y1 = L->YI + CT .r' .yt; 

L->Z1 = L->ZI + fTvllN’dz); 

} 

} /• end clipjine *, 


/• COMPARES POSITION OF LINE TO VIEW VOLUME: 
returned codes: 0 outside of view volume 

1 partially inside volume 

2 entirely in view volume 

*/ 


iut clip_Uue_3d(L) 

LINE ‘L; 

{ 

int IN_VOLUME=I,i. CI=0.C2 = 0; 


for (i=0;i< =5; + +i) { 

CI + =L->CLIPI[i]; 

C2+ = L->CLIP2|iJ; 

if (a- >CLIPI li] = = I)&&(L- > CLIP2|il = = I)) 

IN VOLUME=0; /* outside view volume •/ 

) 

if ((IN_VOLUME= = l)&&((CI = =0)&&(C2= =0))) 
IN_VOLUME = 2; /* entirely in view volume */ 
return IN_VOLUME; 

} /* end clip_line_3d */ 
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/* Maps the final line coordinates (from the canonical volume) to 
the desired destination device coordinates. 

MAX_X and MAX_Y are declared at the top of this file and can he 
modified as needed*/ 

void inap_fo_screeii(L,XMI.\,YMI\) 

line~*l7 

double XMIN.YMIN; 

{ 

L->XI = myabs((L->Xl-XMIN)/(2*XMlN)*MAX_X); 

L->X2 = myabs((L->X2-XMIN)/(2*XMIN)*MAX_X); 

L->Y1 = myabs((L->Yl-YMlN)/(2*YMIN)*MAX_Y); 

L->Y2 = myabs(a->Y2-YMIN)/(2*YMIN)*MAX_Y); 

/* standard limits on iris are: 1279.0, 1023.0*/ 

} /* end map_to_screen */ 


/* A raw line goes thru the normalizing Iransfonnalion and clipping. 

A 1 is returned if line was not totally clipped oui of view */ 

iui project_line{X.Y,Z.ORIE\T.L,W.\Vl.FL) 

double X.Y.Z.ORIENT; 

LINE *L; 

WINDOW *W.*W1; 
double FL; 

{ 

double ZMIN.SCALEX.SCALEY.SCALEZ.VRP Z; 
ini USED_L1NE=1,CL1PT; 
double (1=1.24; 

double Xl.Yl.Zl.XTEMP.YTEMP. 

translateJine(L.-W->XMlN.-W->YMIN,-W->ZMIN):/*Make VRP origin*/ 
rol_z(L.70RIENT); 

XI =X-W->XMIN; /*TRANSLATE and rotate the camera position*/ 
Y1=Y-W->YMIN; 

Z1=Z-W->ZMIN; 

XTEMP=X1; 

YTEMP=Y1; 

XI = XTEMP*cos(-ORIENT)-YTEMP*sin(-ORlENT). 

Yl = YTEMP*cos(-ORIEND + XTEMP*sin(-ORIENT); 
translale_line(L.-X 1Y1 .-ZI); 

/* change from world to view coords */ 

/* shear so view volume centered on z-axis is not needed*/ 

/* now scale view vol to unity using s_per */ 

/* NOTE: FAR_CLIP is global value */ 

VRP_Z = -Yl; /*5ince still in world coords*/ 

SCALEX = 2.0*VRP_Z/((W1->XMAX-W1->XMIN)*(VRP_Z + FARCL1P)). 
SCALEY = 2.0*VRP_Z/((W1->YMAX-WI->YMIN)*(VRP_Z + FARCLIP)); 
SCALEZ = -1.0/(VRP_Z + FARCLIP); 
shift_coord_line(L); 

scaleJine(L,SCALEX,SCALEY.SCALEZ): 

ZMIN=SC ALEZ*(VRP_Z + NEARCLIP); 
get_clipping_codes(L,ZMlN); 

CLIPT=clip_line_3d(L); /*8ee if any of line is showing*/ 

if (CLIFT! =0) { /*if so clip off unwanted parts*/ 

if (CLIPT= = I) 

clipjine (L.ZMIN); 
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perspectivejransform(L,ZMIN); /**project onto window*/ 
map_lo_scr«jen(L.ZMlN,ZMIN); /*inap to device coords*/ 

) 

else 

USED_LINE = 0 ; 

rcium USED_LINE; /*lel caller know if line accepted or nol*/ 

} /• end projecl_line ♦/ 


/* Remove unwanted lines from final list. Notice that this is only used by 
get_view to filter out the set of line returned from conduct_visibility_sweep*/ 

void remave_line(L,LII) 

LINE 'L; 

L1NE_HEAD *LH; 

{ 

LINE •NEXT_L=LH->LINE_LIST, ‘TRASH; 

if (L==LH->LINE_LIST) { 

LH- > LINE_LIST = LH- > LINELIST- > NEXT: 
free(L); 

} 

else { 

while ((NEXT_L- > NEXT)&&(NEXT_L- > NEXT! = L)) { 
NEXT_L = NEXT_L- > NEXT; 

} 

NEXTL- > NEXT = NEXT_L- > NEXT- > NEXT; 
free(L); 

} 

LH-> LINES-; 

} /* end reniove_line */ 


void retunve_vert_liue(L,Ln) 

LINE *L; 

LINE HEAD*LH; 

{ 

LINE *NEXT_L = LH->VLINE_LIST. ‘TRASH; 

if (L==LH->VLINE_LIST) { 

LH- > VLINELIST = LH- > VLINELIST- > NEXT; 
free(L); 

} 

else { 

while f(NEXT_L->NEXT)&&(NEXT_L->NEXT! = L)) { 
NEXT_L=NEXT_L- > NEXT; 

} 

NEXTL- > NEXT = NEXTL- > NEXT- > NEXT; 
free(L); 

> 

LH->VERT_LINES-; 

} /‘ end remove_vert_line ‘/ 
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/• Called from outside the file. This function calls conduct_visibllity_sweep 
(file visibility .h) to generate a list of lines which may be visible from 
the camera position (PRPX.PRPY.PRPZ). The returned lines are then inspected to 
determine if they fall within the cameras field of vision (view volume' Those 
that don’t are removed from the list. Those that are seen are projected into 
2d coodinates and mapped to an output device (i.e.- an iris screen). The camera 
field of vision is determined by focal length (FL) parameter and the CCD size 
declared at the top of this file. 

PRPX,PRPY,PRP2 

ORIENT (0.0 is down y-axis of model) 

W 
FL 


INPUT: camera position 
camera orientatiuon 
target world pointer 
camera focal length 


*/ 


LINEJIEAD *get_vie>v(PRPX,PRPY,PRPZ.ORIENT.W.FL) 


double PRPX.PRPY.PRPZ.ORIENT.FL; 

WORLD *W; 

LINE *NEXT_L.*TRASH. 

L1NE_HEAD ‘LH . /*list of visible lines* ' 

WINDOW ‘WIN.‘Wl; 

double Zl. Z2. XX. YY. ZZ. XTEMP. YTEMP: 
int count = 0; 


VIEW_ANGLE = 2.0*atan(CCD'(2.0*FL)); 

ORIENT=ORIENT*PI/180.0; /*converl to rads*.' 

WIN = calc_window(PRPX.PRPY.PRPZ,ORlENT.FL);/*2nd window for reference* 
W1 =calc window(PRPX.PRPY.PRPZ.ORIENT.FL); 
translate_window(Wl .-(WIN- > XMIN).-(WIN- > YMIN). 

-(WIN->ZMIN)); 
rot_window(Wl .-ORIENT): 

XX”=PRPX-WIN->XMIN; /‘calculate PRP * 

YY = PRPY-WIN->YMIN; 

ZZ= PRPZ-WIN- > ZMIN; 

XTEMP = XX; 

YTEMP=YY; 

XX = XTEMP*cos(-ORIENT)-YTEMP*sin(-ORIENT); 

YY = YTEMP*cos(-ORIENT)-l-XTEMP*sin(-ORIENT). 
translate_window(W 1.-XX. - Y Y .-ZZ); 

/‘shift from model to graphics coordinates*/ 
shift_coord_window(W 1); 

/‘Get the set of all lines which may be visible*/ 

LH = conducl_visibilily_sweep(W. Pki^X. PRPY.PRPZ); 

NEXT_L=LH->VLINE_LIST; 

while ^EXT_L) { 

if (projecl_line(PRPX.PRPY.PRPZ.ORIENT.NEXT_L.WIN.Wl.FL)!=l){ 
TRASH = NEXT_L; 

NEXT_L=NE.XT_L- > NEXT; 

remove_vert_line(TRASH.LH); /‘delete unseen lines*/ 

} 

else { 

NEXT_L = NEXT_L- > NEXT; 

) 

} /* end while */ 

NEXT_L=LH- > LINE_LIST; 
while (NEXT_L) { 

if (project_line(PRPX.PRPY.PRPZ.ORIENT.NEXT_L.WIN.Wl.FL)!= 1) { 
"trash = NEXT_L. 

NEXT_L=NEXT_L- > NEXT; 

remove_line(TRASH.LH); /‘delete unseen lines*/ 

} 

else { 
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NEXT_L = NEXT_L- > NEXT; 

} 

} /♦ end while */ 

freeCWlN); /‘deallocate memory*/ 
free(Wl); 

return LH; /‘return list of lines seen (in final device coords*/ 
} /* end gel_view */ 


/* This function operates exactly like get_view except that no call is made 
to conduct_visiblity_sweep. Instead the model is stepped through and 
make_line is called to construct each line from the model. The resulting 
output is a list of all model lines (as if everything was transparent).*/ 

LI\E_HEAD •get_fiiU_view(PRPX,PRPY,PRPZ,ORIENT,\V,FT) 

double PRPX.PRPY.PRPZ.ORIENT.FL; 

WORLD ‘W; 

{ 

POLYHEDRON ‘NEXT PH; 

POLYGON *NEXT_PG; 

VERTEX ‘NEXT V; 

INSTANCE ‘NEXT!. 

LINE ♦NEXT_L: 

LINE_HEAD *LH =creale_linc_headO; 

WINDOW ’WIN. *W1; 

double Zl. Z2. XX. YY. ZZ. XTEMP. VTEMP; 
ini count = 0; 


ORIENT=(ORIENT-0.0)*PI/180.0; /•convert to rads*/ 
VIEW_ANGLE = 2.0*atan(CCD/(2.0*FL)); 
WIN=calc_window(PRPX,PRPY.PRPZ,ORIENT,FL). 
Wl=calc_window(PRPX,PRPY.PRPZ.ORIENT.FL). 
translate_window(Wl.-(WIN->XMIN).-(WIN->YMIN). 

-(WIN->ZMIN)): 
rol_window(Wl .-ORIENT); 

XX = PRPX-WIN->XMIN; 

YY = PRPY-WIN- > YMIN; 

ZZ = PRPZ-W1N->ZMIN; 

XTEMP=XX; 

YTEMP=YY; 


XX = XTEMP*cos(-ORIENT)-YTEMP*sin(-ORIENT); 

YY = YTEMP*cos(-ORIENT)-HXTEMP*sin(-ORIENT); 
translale_window(Wl,-XX.-YY.-ZZ); 

/* change from world to view coords */ 
shift_c(X)rd_window(W 1); 

NEXT_PH = W- > POLYHEDRONLIST; 
while (NEXT_PH) { 

NEXTJ = NEXT_PH- > INSTANCELIST; 
while ^EXT_D { 

NEXT_PG = NEXTPH- > POLYGON_LIST; 
while(NEXT_PG) <” 

NEXT_V = NEXT_PG- > VERTEXLIST; 

Zl = NEXT_PG- > ZVALUE; 
while(NEXT_V) { 
if (NEXT_V- > VERT_EDGE) { 

Z2 = fmd_z(N EXTPH ,NEXT_V- > VERT_EDGE). 
NEXT_L=makeJine(NEXT_I,NEXT_V,NEXT V->VERT_EDGE,Z1.Z2); 
if (projeclJi?e(PRPX,PRPY,PRPZ.ORIENT.NEXT_L.WlN.Wl.FL)= = I){ 

addJines(LH.NEXT_L); 

> 

} /* end if */ 
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if (NEXT_V->NEXT) { 

NEXT_L=imke_lintf(NEXT_I.NEXT_V.NEXT_V- > NEXT.Zl .Zl); 
if (projeci_line(PRPX.PRPY.PRPZ,ORIENT.NEXT_L.WIN.Wl.FL)= = I)< 

add_lines(LH.NEXT_L); 

> 

NEXT_V = NEXT_V- > NEXT; 

} /* end if •/ 
else { 

NEXT_L= make_line(NEXT_l,NEXT_V,NEXT_PG-> VERTEXLIST.Z 1 ,Z 1); 
if (project_hne(PRPX,PRPY,PRPZ,ORIENT.NEXT_L.WIN.Wl .FL)= = 1) { 

add_lines(LH.NEXT_L); 

} 

NEXT_V = NULL; 

} /* end else •/ 

} /* end while */ 

NEXT_PG = NEXTPG- > NEXT; 

) /* end while *! 

NEXTJ=NEXTJ- > NEXT; 

} /• end while */ 

NEXT_PH = NEXTPH - > NEXT; 

} /* end while •/ 

freefWIN); /‘•deallocate memory*/ 

freefWl); 

return LH; 

} /* end get_full_view */ 
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/•*••*****•* 

FILE NAME: 
AUTHOR: 
PROJECT: 
Date: 


2d + sim.h 
LT James Stein 

Thesis, wire frame simulator for YAMIBICO 
Mar 1992 


Calls to file(s): graphics.h 

-Igl (general iris graphics library) 

This program is used to display a world which has been created through 
uses of the 2d-l- model construction functions in file '2d-t- .c'. Objects in 
the world are drawn to the screen as wire frames as seen from the current 
robot configuration in the world. 

The simulator currently gives you control of robot (eye) 
movement through use of the mouse. The middle button provides a menu of 
options for increasing/decreasing speed, pausing the simulation, starting 
the simulation, and quitting. The robots direction is limited to the X/Z 
plane and is controlled by the left/right mouse buttons. 

The simulator must be passed a pointer to a WORLD structure when called. 

A query is then sent to the user to supply the initial configuaration 
of the robot within this world. 

t*it**************************'¥**********'****4‘**************’¥***m**********j 


typedef struct config 

{ 

double X.Y.Z; 
double THETA; 

} CONFIG; 

#define ASPECT 1.2.^ /‘aspect ratio for display window*/ 
lUdefine FOCAL_LEN 1.24 /‘camera's focal length*/ 
fdefine V1EW_FIELD 3(X).0 /‘in tenths of degrees*/ 


/* Get the initial position and heading (configuaration) of the robot from user*/ 


CONFIG *get_iiutial_configO 

{ 

CONFIG ♦START_CONFlG; 
double DEGS; 

START_CONFIG = (CONFIG •)malloc(si 2 eof(CONFIG)); 
printfCXnEnter initial configuration of robot:\n''); 
printfCX; “); 

scanf(-\n%ir.&START_CONFIG- >X); 
printf(-\nY: "); 

8canf(-\n%ir.&START_CONFIG- > Y); 

prinlfCNnZ (height of eye): ■); 

scanf(’\n%ir,&START_CONFIG- > Z): 

printf(’'\nEnter angle of orientation in X/Z plane (in degrees): ’’); 

scanfC\n%ir,&START_CONFIG->THETA); 

return START_CONFIG~; 

} /* end get_initial_config */ 
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void print introO 

{ 

printf('\n\nInlro<luclion lo the YAMIBICO simulator An’): 
printf("\n\nThis simulator will display a robot's eye vieu- of a world"): 
printf(’\nwhich has been constructed in the 2d-t- format.’): 
printf('\n\nThe world is displayed as a wire frame model and you can’): 
printf(’\ncontrol the walkthru's speed and motion.\n"); 

} /* end prinl_intro •/ 


void priut_iustructioa.sO 

{ 

printf(’\n\nINSTRUCTIONS:\n’); 

printf(’\nYou will need to enter the starting position of the robot ’); 
printf(’\nin your world. The robots heading can be controlled by ’); 
printf(’\nhilting the left/right mouse buttons. The middle mouse ’); 
printf(’\nbutton will present you with a menu of other options for: ’): 
printf('\n -controlling speed ’); 
printf(’\n -pausing simulation ’): 
printf(’\n -starting simulation ’): 
printf('\n -quitting simulation’): 

printf("\n\n For now enter the starling position of your robot and ’): 
printf(’\nthe theta angle in the X/Z plane: ’): 

} /* end print_instruclions */ 


/* initialize the window parameters */ 
void initializeO 
{ 

winopenCWORLD VIEW"): 
wintitle(’5th floor"): 
doublebufferQ: 

RCBmodeO: 

qdevice(REDRAW): 

qdevicefWINQUIT): 

qdevicefWINSHUT): 

qdevice(LEFTMOUSE): 

qdevice(MIDDLEMOUSE): 

qdevice(RIGHTMOUSE); 

} /* end of initialize */ 


/* define menus which can be presented to the user 

iut deniie_iuenusO 

{ 

int MAlN_MENU.POLY_MENU.SELECT_MENU: 

M AIN_MENU=defpup(’OPTIONS: %l 1 START/RESTART | PAUSE j SLOWER! FASTER | STOP 1 QUIT9f x99’): 

return (MAIN_MENU); 

} /• end defme_menus •/ 
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/' 


FUNCTION: sel_colorO 

used to set the RGB color of display 


void set_color(iiidex) 

ini index; /* color index from building array *! 

{ 

switch(index) { 

case 0: RGBcolor(0, 0, 0); 

break; /* black •/ 

case 1; RGBcolor(255, 255, 255); 

break; /* while */ 
case 3: RGBcolor(0, 150. 0): 

break; /* green •/ 

case 4: RGBcolorfO, 0, 245); 

break; /* blue */ 
default: 

printf("error in color coding"); 


} 


/* copy a new configuration into an old one */ 


traaslale_conrig(\VORLD_CONFIG .NEW _CONFIG) 
CONFIG ’WORLD CONFIG. ’NEW CONFIG; 

{ 

NEWCONFIG- > X = WORLD_CONFIG- > X; 
NEw"cONFIG- > Y=WORLD^CONFIG- > Y; 
NEW^CONFIG- > Z = WORLD^CONFIG- >Z; 
NEW~CONFIG- >THETA = WORLD CONFIG- >THETA; 

} 


/’ set up viewing situation in 3d environment’/ 


void proj_view_niatrix(WORLD_CONFIG) 

CONFIG •WORLD_CONFIG~ 

< 

double REFX.REFZ; 

CONFIG ’NEW CONFIG; 

perspeelive(VIEW_FIELD,ASPECT,NEARCLIP,FARCLlP); 

NEW CONFIG = (CONHG ’)malloc(si 2 eof(CONFIG)); 
translate_configfWORLD_CONFIG. NEWCONFIG); 

REFX = (NEWCONFIG- > X -t-cos(NEW_CONFIG- > THETA)); 

REFZ= NEW_CONFlG- >Z+ sinfNEWCONFIG- > THETA); 
lookat(NEW_CONFIG- > X.NEWCONFIG- > Y.NEWCONFIG- > Z, 

REFX,NEW_CONFIG- > Y.REFZ.O); /’tell system the position of eye’/ 

free(NEW_CONFIG); ~ 

} /’ end proj_view_matrix •/ 


/’ project movement of robot along current theta in proportion to 
current velocity ’/ 
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calc_cooHg(OLD_CONFIG.VELOCITY,NEW_CONFIG) 
CONFIG •OLD_CONFIG, ‘NEW CONFIG; 
double VELOCrrY; 

{ 


NEWCONFIG- >THETA = OLD_CONFIG- >THETA. 

NEW_CONFlG- >Z=OLD_CONFIG- > Z; 

NEw”cONFIG->X=OLD_CONFIG->X-VELOCITY*sm(OLD_CONFIG->THETA*PlM80.0); 
NEWCONFIG- > Y=OLD_CONFlG- > Y VELOCrrY*cos(OLD_CONFIG- > THETA*PI/180.0); 
} /• end calc_conrig •/ 


/* print current configuration onto the screen */ 

void display_conflg(ORIENTATIO\) 

CONFIG •ORIENTATION, 

{ 

char ‘MSG; 

CONFIG ‘DISPLAY; 
double MOCK_V = 5.0; 

DISPLAY = (CONFIG •)malloc(sizeof(CONFIG)); 
calc_config(ORIENTATION.MOCK_V.DISPLAY); 

MSG = (char *)calloc(80,sizeof(char)); 
sprintf(MSG,'X; %.t\( Y; Z; '?.2ir, 

ORIENTATION- > X.ORIENTATION- > Y .ORIENTATION- > Z); 
cmov2(500.0,100.0); /‘line for coordinates*/ 
charstr(MSG); /‘line for orientation*/ 

cmov2(500.0,50,0); 

sprintf(MSG,-THErA(degs); (? .2ir,ORIENTATION- >THETA); 

charstr(MSG); 

freefDISPLAY); 

) /* end display_conrig */ 


/• Draw the set of lines extracted from the model to the screen*/ 

void draw_Kreen(LIST) 

UNE_HEAD ‘LIST; 

{ 

LINE *NEXT_L=LIST->LINE_LIST; 

linewidth(I); 

RGBcolor(0.0,0); 

ortho2(0.0,XMAXSCREEN ,0.0. YM AXSCREEN); 
while (NEXT_L) { /‘draw non-vertical lines*/ 

move2(NEXT_L- > X1. NEXT_L- > Y1); 
draw2(NEXT 1,- >X2,NEXT_L- > Y2); 

NEXT_L=NEXT L->NExf; 

> 

NEXT_L=LIST- > VLINE_LIST; 

while (NEXT_L) { /‘draw vertical lines*/ 

inove2{NE)a_L- > X1 .NEXT_L- > YI); 
drBw2(NEXT3.- > X2 .NEXt3.- > Y2); 

NEXT_L« NEXT_L-> NEXT; 

) 

} /* end draw_acreen */ 
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/* Process the option selected from pull down menu 
NOTE: some space is reserved for future ftinctionalliiy*' 

void processiuemiliiKCHOICE.RL'N_PR(KIRA.M.VELOCITV) 
int CHOICE, 
im •RUN_PROGRAM: 
double •VELOCITY; 

{ 

switch(CHOICE) { 
case -1: /•no selection •/ 

break; 

case 1: /• start simulation •/ 

•RUN_PROGRAM=l; 

break; 

case 2; /• stop simulation •/ 

•RUN_PROGRAM = 0; 
break; 
case 3: 

•VELOCITY-=10; 
break; /•slower^/ 
case 4: 

•VELOCITY=20; 
break; /•faster^/ 
case 5: 

•VELOCITY=0; 
break; /•slop robol^/ 

/•future use^/ 


case 6: 
break; 

/• pick closest polygon •/ 

ease 7; 
break; 

/• pick next polygon •/ 

case i: 
break; 

/• delete polygon •/ 

case 9: 
break; 

/• modify polygon •/ 

case 99: 

break: 

default: 

/• terminate program •/ 

break; 



} /• end switch on CHOICE •/ 
} /• end processmenuhil •/ 
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/••••*********************in*in procedure ♦***♦•**•*••••*•••* 

Calls either the gel_view or gel_full_view function from file 
graphi. " : 1st will return a list of visible lines from 
THE_WORi.O while the latter returns a set of all lines. 


void siaiulate(THE_WORLD) 

WORLD~»THE_WORLD; 

{ 

CONFIG *OLD_CONFlG. *NEW_CONFIG; 
int VALUE; 

int MENU_CH01CE= 1,MAIN_MENU,RUN_PRC)GRAM = O.COLLISION = 0; 
int *RP; 

double VELOCITY=0; 
double *V; 

LINE_HEAD ‘LLIST; 

print_introO; 

print_instructionsO; 

OLD_CONFIG=get_initial_config0; /*get start position and heading*/ 

LUST = get_fiill_view(OLD_CONFIG->X.OLD_CONFlG->Y.OLD_CONFlG->Z. 

OLD_c6NFlG->THETA,THE_WORLD.FOCAL_LEN);/*get visible lines*/ 

initializeO; 

RP= &RUN_PROGRAM; 

V = &VELOCITY; /*assign address of velocity to pointer V*/ 

M AIN_MENU=define_menusO; 

NEW_CONFlG = (CONFIG *)malloc(sizeof(CONFlG)); /*alicoate memory*/ 

proj_vie w_[natrix(OLD_CON FIG); 

zbufferfTRUE); 

RGElcolor(255,255,255); /*set to white*/ 
clearQ; 

swapbuffersQ; /*elear display screen*/ 

clearQ; 

draw_screen(LLIST); /*draw the view*/ 

RGBcolor(O.O.O); 

display_con(ig(OLD_CONFIG); /*display the starting configuration*/ 
zbufferfFALSE); 

swapbuffersQ; /*double buffering to smooth out simulation*/ 

while (MENU_CH01CE!=99) { 
if (qtestQ) { /* action is queued */ 

twitch (qtead(&VALUE)) { 

case MIDDLEMOUSE; /*bring up menu of options*/ 

MENU_CH01CE=dopup(MAlN_MENU); 

processmenuhit(MENU_CHOICE,RP,V); /*go do what user selected*/ 
break; 

case LEFTMOUSE: /*tum lefi*/ 

OLD_CONFIG- > THETA=OLD_CONFIG- > THETA+5.0; 
if (OLD_CONFIG- >THETA > 360.0)“ 

OLD_CONFIG->THETA-=360.0; 

break; 
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case RIGHTMOUSE: /‘turn righi* 

OLD_CONFlG- > THETA- = 5.0; 
if (OLD_CONFlG- > THETA < 0 0) 

OLD_CONFIG->THETA-^ =360.0; 

break; 

case REDRAW: 

reshapeviewportO; 

break; 

case WINQUIT: 
gexitO; 
break; 
default: 
break; 

} 

} 

if (RUN_PROGRAM = = 1) { 

calc_config(OLD_CONFlG.VELOCrrY.NEW_CONFlG);/*move lAW velocity*/ 
proj_view_matrix(NEW_CONFlG); 

free_lines(LLlST); /*deallocate memory used last time*/ 

/*then get the next view*/ 

LLIST = get_full_view(NEW_CONFIG- >X.NEW_CONFIG- > Y.NEW CONFIG- > Z. 

NEW_CONFIG->THETA.THE_WORLD.FOCAL_LEN); 

zbuffer(TRUE); 

RGBcolor(25S,255,255); /*draw white on black*/ 

clearQ; 

draw_screen(l,LIST); /*draw the view*/ 

zbufferfFALSE); 

swapbuffersQ; 

RGBcolor(0,0,0); 

display configfNEW CONFIG); /*display the current configuration*/ 

RGBco7or(255.255.2S5); 

OLD_CONFIG->X = NEW_CONFIG->X; /*updatc to next configuration*/ 
OLD’cONFIG- > Y = NEw“cONFIG- > Y; 

0Ld"C0NFIG- > Z = NEW'CONFIG- > Z; 

OLD_CONFIG- >THETA = NEW_CONFlG- >THETA; 

} /* end run program= = 1 •/ 

} /* end while */ 

free(OLD_CONFIG); /*deallocatc last memory used*/ 

free(NEW_CONFIG); 

free_lines(LLIST); /*notice the world is left intact*/ 

} /* end mainO */ 
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/• FILE: 5th.h 

AUTHOR: LT James Slein 

THESIS ADVISOR: Dr. Kanayama 
CALLS TO FILES: 2d + d.h 

COMMENTS: This is the construction file for the 2d 4- model of the 
5th floor Spanagel Hall (1st half only - up to glass double doors). All 
coordinates are in inches while all angles are in degrees. 

The main function 'make_world* is called to 
build the model using function calls to file 2d 4- .h. Type definitions for 
WORLD, POLYHEDRON, POLYGON, and VERTEX can be found at the top of this file 
also. 

Notice that the floor of H1 is one huge, concave polygon which 
makes up the floor to the hallway as well as all of the office floors. To this 
floor numerous ceilings are added for offices, door jams, and nuin corridors. 

Doors, lights, and molding strips are then added to the model as separate 
polyhedra. 

*/ 


WORLD *make_worid() 

WORLD *W; 

POLYHEDRON *H1. •H2. ‘HS, *H4. *H5. *H6. ’H?, ‘Hb. •H9. •HIO. ‘Hll. ‘H^. 
•H13. ’HH, ‘HIS, ‘Hid. ‘HI?, *H18, *H19, •H20, •H2I. *H22. •H23. •H24. 
•H25. *H26, *H27. *H28, •H29, •H30. »H31. *H32. *H33. •H34. •H35. •H36. 
•H37, *H38, ♦H39, *H40, *H41, •H42. *H43; 

POLYGON ’HIPl, •HIP2. ‘HlPa. 

•H1P4, ‘HIPS .*H1P6. •H1P7, •H1P8. •H1P9. *H1P10. *H1PI1. *H1P12. 

•H1P13, ‘HIPM. *HIP15. ‘HlPlb. *H1P17. ‘HIPIS. *H1P19. *HIP20. *H1P21. 
♦H1P22. •H1P23, •H1P24. *H1P25, *H1P26. •H1P27. •H1P28. •HIP29. ‘HIPJO. 
•H1P31, •H1P32. •H1P33. *H1P34. *HlP3.<i. ‘HlPJe. •HIP37. *HIP38. •H1P39. 
•H1P40, •H1P41, •H1P42. •H1P43, *H1P44, •H1P45. •HIP46. *HIP47, •H1P48, 
•H1P49, ‘HIPSO. ‘HlPSl. •H1P52, •H1P.53, •H1P.54. *H1P55. *HIP56. *H1P57, 
•H1P58, •H1P59, ‘HlPeO. ‘HlPbl, *HIP62. *H1P63. *H1P64, *HIP65. 

•H2P1. *H2P2, *H3P1. •H3P2, *H4P1, •H4P2. *H5P1. *H5P2. 

•H6P1, *H7P1. *H7P2, *H8P1, •H8P2. •H9P1, *H9P2, ‘HIOPI. •HI0P2. 

♦HllPl, *H11P2, ‘HUPl. •H12P2, •H13P1, •H13P2. *H14P1. *H14P2. *H15P1, 
♦H15P2, ‘HiePI, *H16P2. *H17P1, *H17P2, ‘HlSPl, •H18P2, *HI9P1. •Hi9P2. 
♦H20P1, •H20P2. 

•H21P1, *H21P2. •H22P1. *H22P2, *H23P1, •H23P2, •H24PI. *H24P2. •H25P1. 
•H25P2, •H26P1. •H26P2, *H27P1, *H27P2. •H28P1. •H28P2. *H29P1. •H29P2. 
♦H30P1. *H30P2, 

•H3IP1, •H31P2, *H32PI, •H32P2. *H33PI, •H33P2. ♦H34PI. •H34P2. •HJ.'iPI. 
•H35P2, •H36P1. *H36P2, *H37P1. •H37P2. *H38P1. *H38P2. *H39P1. •H39P2. 
♦H40P1, *H40P2, *H41P1. •H4IP2. •H42P1, •H42P2. *H43P1. *H43P2, 
last _p; 


VERTEX 'HIPIVI, ♦H1P1V2, *H1P1V3, *H1P1V4. *HIPIV5. ’HlPIVb. •H1P1V7, 
•H1P1V8,*H1P1V9,*H1P1V10,*H1P1V11.*H1P1V12. ‘HIPIVIS. *H1P1V14. 
•H1PIV15,*H1P1V16,*H1P1V17,*H1P1V18, *H1P1VI9, •H1P1V20. •H1P1V21, 
•HIP1V22,*H1P1V23,*H1P1V24,*H1P1V25, *H1P1V26. •H1PIV27. *H1PIV28. 
•H1P1V29,*H1P1V30,*H1P1V31.*H1P1V32, •H1P1V33. ’HlPIVSd. *H1P1V35. 
•H1P1V36,*H1P1V37,*H1PIV38,*HIPIV39, •HIP1V40. •HIP1V4I. •HIPIV42. 
*H1PIV43.*H1P1V44.*H1P1V45.*H1P1V46, *H1P1V47. •H1P1V48, •H1P1V49. 
•H1P1V50,*H1P1V51,»H1P1V52,»H1PIV53. *H1PIV54, ‘HIPIVSS. ’HlPlVSb, 
•H1P1V57,*H1P1V58.*H1PIV59,*H1P1V60, ‘HlPlvei, •HIPIV62. •HIPIV63. 
•H1PIV64,*H1P1V65,*H1P1V56.»H1P1V67, ‘HlPlveS, •HIPIV69. 'H1PIV70. 

*HlPlV2a, *HIPlV2b, *HlPIV2c, •HlPlV2d. •HlPIV2e. •HIPIV2f. 

•HlPlV4a, •HlPlV4b, •HlPIV4c, •HlPlV4d. *HlPIV4c. •HIPIV4f. 

•HlPlVba, ’HlPlVeb, •HIP1V6C, ‘HlPlVed. ‘HlPIVee. ‘HlPlVbf, 

•HlPlVSa. ‘HlPIVSb, •HlPlV8c, *HlPlV8d. ‘HlPlVSc. *HIPlV8f. 
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HlPlVlOa, *HlPlV10b. *H1PIV10 l. 
'HIPlV12a, *HlPlV12b, *HlPIV12v.. 
HlPlVUa. *HlPlVI4b, *HlPlV14c, 
■HlPlVlba. ‘HlPlVlbb. •H1P1V16C, 
'HlPlV18a, ‘HlPlVlSb, *HlPlV18c. 
'HIPlV20a. •HlPlV20b, •HlPlV20v;. 
'HlPlV22a, •HlPlV22b, 

'HlPlV24a. •HlPlV24b. ♦HlPlV24i, 
'HlPlV26a, *HlPlV26b, •HlPlV26c, 
'HlPlV28a, •HlPlV28b. •HlPlV28c, 
■HlPlVaOa. ‘HlPlVSCb, ‘HlPlVaOc. 
'HIPlV32a. *HlPlV32b, •HlPlV32c. 
‘HlPlV34a, •HlPlV34b. •HlPlV34c. 
'HlPIV36a, •HlPlV36b, *HlPlV36c, 
'HlPlV38a, •HlPlV38b. *HlPlV38c, 
'HlPlV40a, *HlPlV40b.*HlPlV40c, 
'HIPlV42a, •HlPlV42b,»HlPlV42c. 
'HlPlV44a, ■•HlPlV44b, •HlPlV44c, 
'HlPlV46a, *HlPlV46b, *HIPlV46c, 
■HlPlV48a. •HlPIV48b. •HIPlV48c, 
■HlPlVSOa, *HlPlV50b. ♦HlPlVSOc, 
'HlPlV52a. •HlPlV52b. *HlPlV52c. 
HlPlVSSa. *HlPlV5Sb. •HlPlVSSc. 
■HlPlVSSa, *HlPlV58b.*HlPlV58c. 
■HlPlVeOa. *HlPlV60b, ♦HIP1V60C. 
'HlPlV63a. *HlPlV63b. •HIPlV63c. 
'HlPlV63g, 

'HlPlV65a, ‘HlPlVeSb. *HlPlV65c. 
'HlPlV65g, 

‘HlPlV68a, *HlPlV68b, *HlPlV68c. 


'HIPlVI0d.*HlPIV10c. •HlPlVlOf. 
'HlPlVI2d. *HlPIVl2e. •HlPIvnf. 
HlPlV14d,»HlPlVl4c.*HlPlVl4f. 
■HlPlVlbd, *HlPlV16c. *HlPlV16f. 
'HlPlV18d. *HIPIVl8e. *HlPlV18f. 
‘HIPlV20d. *HIPIV20c. *HIPlV20f. 

'HlPlV24d. *HlPlV24e. *HlPlV24f. 
'HlPlV26d, •HIPlV26e, *HlPlV26f. 
'HlPlV28d. *HlPIV28e. •HlPlV28f. 
'HlPlV30d. *HlPIV30e. •HIPlV30f. 
'HlPIV32d, '•HlPlV32e. •HlPlV32f. 
'HlPlV34d, *HlPlV34e. •HlPlV34f. 
'HlPIV36d. *HlPIV36e. •HIPlV36f. 
'HlPlV38d, *HlPlV38c. •HIPlV38f. 
'HIPlV40d. *HlPIV40c. •HlPlV40f, 
'HlPlV42d. •HIPIV42e. •HIPlV42f. 
'HlPlV44d, •H1P1V44C. *H)PlV44f. 
■HlPlV46d. *HlPlV46e. •HlPlV46f. 
■HlPlV48d.*HlPlV48e. *HIPlV48f. 
HlPlVSOd. •H1P1V50C. •H1P1V50I'. 
'HlPlV52d. •HIPlV52e. *HlPlV52f. 
■HlPlV.S5d.*HlPlV55e. •H)PlV55f. 
■HlPIV58d. •HlPIV58e. •HlPIV58f. 
■HlPlVbOd. •HIPlV60c.*HlPlV60f. 
'HlPlV63d. *HIPlV63e. •HlPlV63f. 

■HIPIV65d.»HlPlV65<. •HlPlV65f. 

'HlPlV68d. ‘HlPlveSc. *HlPIV68f. 


'H1P2VI, •H1P2V2, *H1P2V3. *H1P2V4. 

•H1P3V1. •H1P3V2, •H1P3V3. *HIP3V4, 
'H1P4V1, •H1P4V2. *H1P4V3. •H1P4V4. 
'H1P5V1. •H1P5V2. ‘HlP-Wd. •H1P5V4. 
'H1P6V1, *H1P6V2. •HIP6V3, ’HlPbVd. 
H1P7VI. *H1P7V2. •H1P7V3. •H1P7V4. 
'H1P8V1. •H1P8V2. *H1P8V3. •H1P8V4. 
'H1P9V1. •HIP9V2. *H1P9V3. ‘HlPyVd. 


HlPIOVl, 

*H1P10V2, 

♦H1P10V3. 

♦H1P10V4. 

HlPllVl. 

•HIPI1V2. 

*HlPnV3. 

♦H1P11V4, 

H1P12V1, 

♦HIP12V2. 

•H1P12V3, 

*H1P12V4. 

H1P13V1, 

*H1P13V2. 

•H1P13V3, 

*H1PI3V4. 

H1P14VI, 

•H1P14V2, 

•H1PI4V3, 

•H1P14V4. 

H1P15V1. 

•HIP15V2. 

•H1P15V3. 

•H1P15V4. 

H1P16V1, 

•H1P16V2. 

•H1P16V3, 

♦H1P16V4. 

HIPITVI, 

•HIP17V2. 

♦H1P17V3. 

*HIP17V4, 

H1P18VI. 

•H1P18V2, 

•H1P18V3, 

•H1P18V4, 

H1P19VI, 

•H1P19V2. 

•H1PI9V3. 

•H1P19V4. 

H1P20V1, 

•H1P20V2, 

•H1P20V3. 

•H1P20V4. 

H1P21V1, 

•H1P21V2. 

•H1P21V3, 

♦HIP2IV4, 

H1P22V1. 

*H1P22V2. 

•H1P22V3. 

•HIP22V4, 

H1P23VI, 

♦H1P23V2. 

♦HIP23V3. 

•HIP23V4. 

H1P24V1. 

•H1P24V2. 

♦H1P24V3, 

♦H1P24V4. 

HIP25V1, 

♦H1P25V2. 

*HIP25V3, 

♦HIP25V4. 

H1P26V1, 

♦H1P26V2, 

•H1P26V3, 

•HIP26V4, 

H1P27V1, 

•H1P27V2. 

•HIP27V3. 

♦HIP27V4. 

HIP28V1. 

♦HIP28V2. 

*H1P28V3, 

•H1P28V4. 

H1P29V1, 

•H1P29V2, 

*H1P29V3. 

•H1P29V4. 

HIP30V1, 

•HIP30V2, 

’HIP30V3. 

•H1P30V4. 

H1P31V1. 

•HIP3IV2. 

♦HIP31V3. 

♦H1P31V4. ’HlPdlV,*;, 

H1P32V1, 

•H1P32V2. 

♦H1P32V3. 

•H1P32V4.*H1P32V5, 
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'HIP33V1,*H1P33V2, 
'H1P34V1,*H1P34V2, 
■H1I>35V1,*H1P35V2, 
'HIP36VI,*H1P36V2. 
'HIP37V1,*H1P37V2, 
'H1P38V1. •H1P38V2, 
'H1P39VI.*H1P39V2. 
'H1P40V1. *HIP40V2. 
'H1P41V1, •H1P41V2, 
'H1P42V1.*H1P42V2, 
'H1P43V1, •H1P43V2. 
■HIP44V1, *H1P44V2, 
'H1P4SVI, •H1P45V2. 
'H1P46V1,*H1P46V2, 
'H1P47V1,*HIP47V2, 
'H1P48V1. •HIP48V2. 
'H1P49V1, *H1P49V2. 
'H1P50V1, *H1P50V2. 
'H1P51V1. *H1P51V2, 
■H1P52V1. *H1P52V2. 
'H1P53V1. •H1P53V2. 
'H1P54V1, *H1P54V2. 
'H1P55V1.*H1P55V2. 
'H1P56V1.*H1P56V2, 
'H1P57V1. *H1P57V2. 
‘H1PS8V1. •H1P58V2, 
'H1P59V1, •H1P59V2. 
'H1P60V1.*H1P60V2. 
'H1P61V1,*H1P61V2, 
'HIP62V1,»HIP62V2. 
'HIP63V1. *H1P63V2. 
'H1P64VI.*HIP64V2. 
H1P65VI,*H1P65V2. 


H1P33V3, *H1P33V4. 
H1P34V3, *H1P34V4. 
'H1P35V3, *H1P35V4. 
H1P36V3. •HIP36V4. 
H1P37V3. •H1P37V4, 
HIP38V3. *H1P38V4. 
'H1P39V3. *H1P39V4. 
'HIP40V3, •H)P40V4, 
H1P41V3, •H1P41V4. 
'H1P42V3, •H1P42V4. 
'H1P43V3. •H1P43V4. 
'H1P44V3, •HIP44V4. 
'H1P45V3, *H1P45V4, 
'H1P46V3, •H1P46V4. 
'H1P47V3,*H1P47V4. 
'H1P48V3, •H1P48V4, 
'H1P49V3, •H1P49V4. 
'H1P50V3. •H1P50V4, 
'H1P51V3. *H1P51V4. 
■H1P52V3. *HIP52V4, 
'H1P53V3, *H1P33V4. 
'H1P54V3. *H1P54V4. 
'H1P55V3.*H1P55V4. 
■H1P56V3, *H1P56V4. 
'H1P57V3, *H1P57V4. 
'H1P58V3. ‘H1P58V4. 
'H1P59V3. *H1P59V4. 
'H1P60V3. •H1P60V4. 
'H1P61V3, •H1P61V4. 
'H1P62V3, •H1P62V4. 
■HIP63V3. •H1P63V4. 
■H)P64V3. •HIP64V4. 
'H1P65V3, •HIP65V4, 


•H2P1V1. •H2P1V2. *H2P1V3. •H2PIV4, *H2P2V1. •H2P2V2. •H2P2V3. *H2P2V4. 
•H3PIV1, *H3P1V2. •H3P1V3. •H3PIV4, •H3P2V1. *H3P2V2. *H3P2V3. •H3P2V4. 
♦H4PIVI, •H4P1V2. *H4PIV3, *H4PIV4. •H4P2VI. •H4P2V2. *H4P2VJ. *H4P2V4. 
♦H5PIV1. •H5P1V2, *H5P1V3. •H5P1V4, »H5P2V1, *H5P2V2. *H5P2V3. •H5P2V4. 
*H6P1V1. •H6P1V2. *H6P1V3, •H6P1V4. 

•H7PIV1. •H7P1V2, •H7P1V3. •H7P1V4, •H7P2V1, •H7P2V2. •H7P2V3. *H7P2V4. 
•H8PIV1. •H8PIV2, *H8PIV3, *H8PIV4, •H8P2V1. *H8P2V2. •H8P2V3. •H8P2V4. 
•H9P1V1, •H9P1V2. •H9P1V3, •H9P1V4. •H9P2V1. •H9P2V2, •H9P2V3, *H9P2V4. 
♦HIOPIVI, *H10P1V2. *H10P1V3. *H10P1V4. •H10P2V1, •HI0P2V2. •H10P2V3. •H10P2V4. 
*H11P1V1,*HIIP1V2. *H11P1V3. •H11P1V4, •H11P2V1,*HIIP2V2.»H11P2V3.*HIIP2V4. 
•HI2PIV1. •H12PIV2, •HJ2P1V3. *HI2P]V4, •HI2P2V1. •HI2P2V2. •HJ2P2V3. •HI2P2V4. 
•HI3P1V1, •H13P1V2. •H13P1V3. *H13P1V4. *H13P2V1, *HI3P2V2. *H13P2V3. •HI3P2V4. 
♦H14P1V1, •H14P1V2, •HI4P1V3, •H14P1V4. •H14P2V1. •HI4P2V2. •H14P2V3. •H14P2V4. 
♦H15P1V1, *H15P1V2. *H15P1V3. •H15P1V4, *HI5P2V1. •H15P2V2. •HI5P2V3, •H15P2V4. 
•H16P1V1, •H16P1V2, *H16P1V3, •H16P1V4. ♦HI6P2VI. •H16P2V2. •H16P2V3. *HI6P2V4, 
•H17P1V1, •H17P1V2, •H17P1V3, *H17P1V4. •H17P2V1, •HI7P2V2. •H17P2V3. *H17P2V4, 
•H18P1V1, •H18P1V2, •H18P1V3, *HI8P1V4, *H18P2VI. •HI8P2V2, •H18P2V3, •H18P2V4. 
*H19P1VI, •HI9PIV2, •H19P1V3. *H19P1V4, •HI9P2V1. *H19P2V2. •HI9P2V3. •H19P2V4. 
♦H20P1V1. •H20P1V2, *H20P1V3, ♦H20P1V4, •H20P2V1, •H20P2V2. •H20P2V3, •H20P2V4. 
•H21P1V1, •H21P1V2. •H21P1V3, •H21P1V4, •H21P2V1, •H2IP2V2. •H21P2V3, •H21P2V4. 
•H22P1V1, •H22P1V2, *H22P1V3. ♦H22P1V4, •H22P2VI, •H22P2V2, •H22P2V3. •H22P2V4, 
•H23P1V1, •H23P1V2. •H23P1V3, •H23P1V4, •H23P2V1. •H23P2V2. •H23P2V3. •H23P2V4, 
•H24P1V1, •H24P1V2, •H24PIV3, •H24P1V4, •H24P2V1. •H24P2V2, •H24P2V3, •H24P2V4, 
•H25PIV1, •H25PIV2, •H25P1V3. *H25P1V4. •H25P2V1. •H25P2V2. •H25P2V3. •H25P2V4. 
•H26P1VI, •H26PIV2, •H26P1V3, •H26P1V4, •H26P2V1, •H26P2V2, •H26P2V3. •H26P2V4. 
♦H27P1VI. ♦H27P1V2. •H27P1V3. *H27P1V4, *H27P2V1. •H27P2V2. •H27P2V3. *H27P2V4. 
♦H28P1V1, *H28P1V2, •H28P1V3. *H28P1V4. •H28P2V1. •H28P2V2. •H28P2V3. •H28P2V4. 
•H29P1VI, *H29P1V2, •H29P1V3. *H29PIV4. *H29P2V1. •H29P2V2. •H29P2V3. *H29P2V4. 
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♦H30P1V1. ‘HSOPIVI. *H30P1V3. •H30P1V4, 
•H31P1V1. *H31P1V2. •H31P1V3. *H31P1V4, 
♦H32P1V1, •H32P1V2. *H32P1V3. *H32P1V4, 
•H33P1V1, •H33P1V2, *H33P1V3, •H33P1V4, 
•H34P1V1, •H34P1V2. *H34P1V3. •H34P1V4. 
•H35P1V1, •H35P1V2. *H35P1V3. *H35P1V4. 
•H36P1V1. •H36P1V2, •H36P1V3. •H36P1V4. 
•H37P1V1, *H37P1V2. •H37P1V3. *H37P1V4. 
♦H38PIV1. •H38P1V2, •H38P1V3. •H38P1V4, 
♦H39P1V1. *H39P1V2, •H39P1V3. •H39P1V4. 
•H40PIV1, *H40P1V2, •H40P1V3. *H40P1V4, 
*H4IP1V1, •H41PIV2. *H4IP1V3, *H41PIV4, 
•H42PIV1. *H42PIV2, *H42P1V3. *H42P1V4, 
♦H43P1V1. *H43P1V2, ♦H43P1V3, •H43P1V4. 
Iasi v: 


♦H30P2V1. •H30P2V2. *H30P2V3. •H30P2V4. 
♦H3IP2V1, *H31P2V2. *H31P2V3. *H31P2V4. 
♦H32P2V1, *H32P2V2. •H32P2V3. *H32P2V4. 
♦H33P2V1, *H33P2V2. *H33P2V3. ‘H33P2V4, 
•H34P2V1. ♦H34P2V2. •H34P2V3, *H34P2V4. 
*H35P2V1. •H35P2V2. *H35P2V3. •H35P2V4. 
♦H36P2V1, *H36P2V2. •H36P2V3. •H36P2V4. 
•H37P2VI. •H37P2V2. •H37P2V3. •H37P2V4. 
•H38P2V1, *H38P2V2. *H38P2V3. *H38P2V4. 
•H39P2V1. •H39P2V2. •H39P2V3. *H39P2V4. 
•H40P2V1. •H40P2V2, •H40P2V3. *H40P2V4. 
•H41P2Vt, •H4IP2V2. •H41P2V3. •H41P2V4. 
•H42P2V1. *H42P2V2. *H42P2V3. *H42P2V4. 
•H43P2V1. *H43P2V2. •H43P2V3, •H43P2V4. 


W = add_world("5th_floor' ,9); 

H1 =add_phCfrom_hallMO.W, 1.0); 
HlPl=add_pg(Hl,0.0,1.0); 

HI PI VI = add_vertex(HIP1.0.0.0.0); 

HIPIV2 = add_vertcx(HIPI.0.0,239.5); /*rm 506*/ 
HlPIV2a = add_vertex(HIPI,-5.3.239.5); 

HIPlV2b = add_vertcx(HIPI.-S.3,203.3); 

HIPIV2C = add_ver1ex(HIPI.-244.1.203.3); 

HIPIV2d = add_vertex(HIPI.-244.1.309.4); 

HIPIV2e = add_ver1exfHIPI.-5.3.309.4); 

HI PI V2f = add_verlex(H I PI .-5.3.275.2); 

HIPIV3 = add_vertex(HIPI.0.0.275.2); 

HIPIV4 = add"vertex(HIPI,0.0.713.7); /*nii5IO*/ 
HIPIV4a = add_vertex(HIPI.-5.3.7l3.7); 

HIPIV4b = add_vertex(HIPI.-5.3.677.5); 

HIP1V4C = add_venex(HlPl,-244.1.677..5); 

HIPlV4d = add_vertex(HIPI.-244.1.783.6); 

HIPlV4e = add_vertex(HIPI.-5.3.783.6); 

HIPIV4f = add~venex(HIPI.-5.3.749.4); 

HIPIV5 = add_vertex(HIPI.0.0.749.4); 

HIP1V6 = add~vertex(HIP1.0.0.825.9); /* rm 512*/ 
HlPlV6a = add_vertex{HlPi.-5.3.825.9); 

HlPlV6b = add_vertex(HlPl.-5.3.789.7); 

HIP1V6C = add_vertex(HlPl,-244.1.789.7); 

HlPlV6d = add_vertex(HlPI.-244.1.895.8); 

HlPlV6e = add_vertex(HlPI.-5.3.895.8); 

H1 PI V6f = add_vertex(H 1 PI .-5.3,861.6); 

H1P1V7 = add_vertex(Hl PI .0.0,861.6); 

H1P1V8 = add_vertex(HlPl.0.0,937.5); /• rm 514*/ 
HlPIV8a = add_vertex(HlPl,-5.3,937..5); 

HlPlVSb = add\eilex(HlPI.-5.3.901.3); 

H1P1V8C = add~vertex(HlPl,-244.1.90l.3); 

HlPlVSd = add_vertex(HlP 1.-244.1,1007.4). 

HlPlVSe = add_vertex(HlPl.-5.3.1007.4); 

H1 PI V8f = add ”vertex(H 1 PI .-5.3.973.2); 

H1PIV9 = add_veriex(HlPI.0.0.973.2); 

HIPIVIO » add_veriex(H:PI.0.0,1049.7); /* rm 516 •/ 
HlPlVlOa = add_vettex(Hl PI ,-5.3,1049.7); 

HlPlVlOb - add~veilex(HlPl.-5.3.1013.5); 

HIPlVlOc = add~vertex(HlPl,-244.1.1013.5); 
HlPlVlOd = add_vertex(HlPl.-244.1.1119.6); 
HlPlVlOe = add_vertex(HlPl.-5.3.1ll9.6); 
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HIPJ V1 Of = «dd_veilex(H 1 PI ,-5.3,1085,4); 

HlPlVll = add_vertex(HlP1.0.0.l085 4); 

H1P1V12= add_vertex(HlPI,0.0,1161.7); /* rm 518 */ 
HlPlV12a = add_vertex(HlPl.-5.3,1161.7); 

HlPlV12b = add_verlex(HlPl.-5.3,1125.5); 

H1P1V12C = add_vertex(HlPl.-244.1,1125.5); 

HlPlV12d = add_ver1ex(HlPl.-244.1.1231.6); 

HlPlV12e = add_vertex(HlPl,-5.3.1231.6); 

HlPlV12f = add_verlex(HlPl.-5.3,1197.4); 

H1P1V13 = add_vertex(HlPl,0.0.1197.4); 

HIP1V14 = add_vertex(HlPl,0.0,1273.4); /• mi 520 •/ 
HlPlVMa = add_vertex(HlPl,-5.3,1273.4); 

HlPlVHb = add_verlex(HlP),-5.3,1237.2); 

H1P1V14C = add_verlex(Hl PI.-244.1,1237.2); 

HlPlVUd = add_vertex(HlPl.-244.1.1343.3); 

HlPlVUe = add_vertex(HlPl.-5.3.1343.3); 

H1 PI V14f = add_vertex(H 1 PI ,-5.3,1309.1); 

H1P1V15 = add_ver1ex(Hl PI.0.0,1309.1); 

H1P1V16 = add_venex(HlPl,0.0.1429.6); i* rm 522R */ 
HlPlV16a = add_vertcx(HlPl,-5.3.1429.6); 

HlPlV16b =- add_verlex(HlPl,-5.3.1393.4); 

H1P1V16C = add_vcrtex(HlPl,-244.1.1393.4); 

HlPlV16d = add~vertex(HlPl,-244.1.1499.5); 

HlPlV16e = add~vertex(HlPl.-5.3.l499.5); 

HlPlV16f = add_vertex(HlPl.-5.3.1461.3); 

H1P1V17 = add_vertex(HlPl,0.0.1461.3); 

H1P1V18 = add”vertex(HlP1.0.0,1488.0); /* FD#1 */ 
HlPlV18a = add_vertex(HlPl.-5.5,1488.0); 

HlPlV18b = add\ertex(HlPl,-5.5.1486.0); 

H1P1V18C = add_vertex(Hl PI,-50.0.1486.0). 

HlPlVlSd = add_vertex(H IP 1.-50.0.1562.0); 

HlPlV18tf = add_vertex(HlPl.-5.5.1.562.0): 

H1 PI V18f = add3'ei1ex(H 1P1 .-5.5.1560.0); 

HIP1V19 = add_vertcx(Hl PI.0.0.1560.0); 

H1P1V20 = add_vertex{HlP1.0.0,1.583.3); /* rm 524 */ 
HlPIV20a = add_vertex(HlPl.-.5.3.1583.3); 

HlPlV20b = add_vertex(HlPl.-5.3.1,547.1); 

HIP1V20C = add_ver1ex(Hl PI .-244.1,1.547.1); 

HlPlV20d = add_vertex(HlPl.-244.1.1653.2); 

HlPlV20e = add_verlex(HlPl,-5.3.1653.2); 

H1 PI V20f = add_vertex(H 1 PI .-5.3.1619.0); 

H1P1V21 = add_vertex(HlPl,0.0,l619.0); 

H1P1V22 = add_vettex(HlPl,0.0.1650.4); /* water cooler */ 
HIPIV22a = add_venex(HIPI.-30.0,I650.4); 

HlPlV22b = add_vertex(HlPl.-30.0.1684..5); 

H1P1V23 = add_venex(HlP1.0.0.1684.5); 

H1P1V24 = add'vertexOHlPI.0.0.1754.5); /* rm 526R •/ 
HlPlV24a = add_vertex(HlPl,-5.3.17.54.5); 

HlPlV24b - add_vet1ex(HlPl.-5.3,1718.3); 

H1P1V24C = add_vei1ex(HlPl, 244.1,1718.3); 

HlPlV24d = add'veftexfHl PI ,-244.1.1790.0); 

HlPlV24e = add2vertex(HIPl,-5.3,1790.0); 

H1 PI V24f = add_vertex(H 1 PI .-5.3.1786.2); 

H1PIV25 = add_vertex(HlPl .0.0.1786.2); 

H1P1V26 = add_vertex(HlPI,0.0.1836.4); /* rm 528A */ 
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HlPlV26a = add_vertex(HIPl,-5.3,1836.4); 

HlPlV26b = add_vertex(HlPl,-5.3.1800.2); 

H1P1V26C = add_verlex(HlPl.-244.1,1800.2); 

HlPIV26d = add_vertex(HlPI.-244.1,1875 0); 

H1P1V26S = add_vertex(HlPl.-5.3.1875.0); 

HlPlV26f = add_vertex(HlPl.-5.3,l872.1); 

H1P1V27 = add_vertex(Hl PI.0.0.1872.1): 

H1P1V28 = add~vertex(HlP1.0.0.1919.1); /• rm 528B */ 
HlP!V28a = add_vertex(HlPl.-5.3,1919.1); 

HlPlV28b = add _vertex(HlPl,-5.3.1882.9); 

H1P1V28C = add Jvertex(HlPl,-244.1.1882.9); 

HlPlV28d = add_vertex(HlPl,-244.1.1989.0); 

HlPlV28e = add_vertex(HlPl .-5.3.1989.0); 

HlPlV28f = add_vertex(HlPl .-5.3,1954.8); 

H1P1V29 = add_vertex(HlPl,0.0,1954.8); 

H1P1V30 = add_vertex(HlPI,0.0.2030.4); /• rin 530A •/ 
HlPlV30a = add_vertex(HlPl.-5.3,2030.4); 

HlPlV30b = add_ver1ex(HlPl,-5,3.1994.2); 

H1P1V30C = add_veriex(HlPl,-244.1.1994.2); 

HlPlV30d = add_vertex(HlPl,-244.1.2100.3); 

H1P1V30C = add_vertex(HlPl.-5.3,2100.3); 

H1 PI V30f = add_vertex(H 1 PI ,-5.3.2066.1); 

H1P1V31 = add_vertex(HlPl,0.0.2066.1); 

H1P1V32 = add”vertex(HlPl,0.0,2195,1); /* mi 530B •/ 
HlPlV32a = add_veilex(HlPl,-5.3,2195.1); 

HlPlV32b = add”vertex(HlPl,-5.3,2158.8); 

H1P1V32C = add ”vertex(HlPl,-244.1,2158.8); 

HlPlV32d = add“vertex(Hl PI,-244.1.2250.0); 

HlPlV32e = add venex(HlPI.-5,3.22.50.0): 

H1P1 V32f = add3'etiex(H 1P1 .-5.3.2230.8): 

H1P1V33 = add_ver1ex(Hl PI.0.0.2230.8); 

H1P1V34 = add_vertex(HlPI,0.0.22.53.8): /* rm 530C ♦/ 
HlPlV34a = add_vertex(HlPl.-5.3.2253.8); 

HlPlV34b = add_venex(HlPl.-5.3,2251.0); 

H1P1V34C = add_vertex(HlPl,-244.1.2251.0); 

HlPlV34d = add_verlex(Hl PI.-244.1.23.50.0); 

HlPlV34e = add_vertex(HlPl,-5.3,2350.0); 

HlPlV34f = add_vertex(HlPl,-5.3,2289..S); 

H1P1V35 = add_venex(Hl PI.0.0.2289.5); 

H1P1V36 = add_vertex(Hl PI,0.0.2351,2); 

H1P1V37 = add_vertex(HlP1.98.0.2351.2); 

H1P1V38 = add_vertex(HlP1.98.0,2171.9); /* rm421 */ 
HlPlV38a = add_verlex(HlPl,103.3,2171.9); 

HlPlV38b = add_vertex(HlPl.103.3,2206.6); 

H1P1V38C = add_vertex(HlPl,342.1,2206,6); 

HlPlV38d = add~vertex(HlPl,342.1.2099.5); 

HlPlV38e = add_vettex(HlPl.103.3.2099.5); 

HlPIV38f = add_vertex(HlPl,103.3.2136.2); 

H1P1V39 = add_vertex(HlP1.98.0,2136.2); 

H1P1V40 = add_veftex(HlP1.98.0,l937.7); /• rm 531 */ 
HlPlV40a = add_vertex(HlPl.103.3,1937.7); 

HlPlV40b = add_vertex(HlPl,103.3,1972.7); 

HIPIV40C « add_vertex(HlPl,342.1.1972.7); 

HlPlV40d = add~vettex(HlP1.342.1.1865.6); 

HlPlV40e = add_vei1ex(HIPI.103.3.1865.6); 

H1PI V40f = add_vertex(H 1P1.103.3.1877.7); 
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H1P1V41 = add_vertex(HlPl,98.0,1877.7); 
H!P1V42 = «dd~veftex(HlP1.98.0,1744.5); /* 
HIPIV42a = add_veftex(HIPI.103.3,1744.5); 
HlPlV42b = add\ettex(HlPl.103.3.1779.5); 
H1P1V42C = add3vertex(HlP1.342.1.1779.5); 
HlPlV42d = add"vertex(HlP1.342.1.1672.4); 
HlPlV42e = add_veilex(HlPl,103.3,1672.4); 
H1 PI V42f = add3'eriex(H 1 PI. 103.3,1684.5); 

H1P1V43 = add_verlex(HlP1.98.0,1684.5); 
H1P1V44 = add_vettex(HlP1.98.0.1.522.4); I* 
HlPlV44a = add_vertex(HlPl.103.3,1522.4); 
HlPlV44b = add”vertex(Hl PI, 103.3.1.557.4); 
H)PlV44e = add_vertex(HlP).342.1.1557.4); 
HlPlV44d = add_vertex{HlPl,342.1.1450.3); 
HlPlV44e = add_vertex(HlPl,103.3,1450.3); 
H1P1 V44f = add^'crtexCH 1 PI, 103.3.1462.4); 

H1P1V45 = add_vertex(HlPl,98.0.1462.4); 
H1P1V46 = add_vertex(HlP1.98.0.1342.7); I* 
HlPlV46a = add_vertex(HlPl.103.3,1342.7); 
HlPlV46b = add~vertex(HlPl,103.3.1377.7); 
H1P1V46C = add_vertex(Hl PI,342.1.1377.7); 
HlPlV46d = add_vertex(HlPl,342.1.1270.6); 
HlPlV46e = add_veilex{HlPl,103.3,1270.6); 
H1 PI V46f = add_verlex(H 1P1.103.3.1307.0); 

H1P1V47 = add_venex(HlP1.98.0.1307.0); 
H1P1V48 = add~verlex(HlPl,98.0.1118.8); /< 
HlPlV48a = add_vertex(HlPl,103.3,l 118.8) 
HlPlV48b = add“vertex(HlPl,103.3,11.53.8) 
H1P1V48C = add3vertex{HlP1.342.1,1153.8) 
HlPlV48d = add\ert<x(HIP1.342.1.1046.7) 
HlPlV48e = add”vertex(HlPl,103.3.1046.7) 
H1 PI V48f = add jvertex(H 1 PI. 103.3,1083.1) 

H1P1V49 = add_vertex(HlP1.98.0,1083.I); 
H1P1V50 = add~vertex(HlP1.98.0,796.1); /• 
HlPlVSOa = add_vertex(HlPl.103.3.796.1); 
HlPlV50b = add_vertex(HlP1.103.3.831.l); 
H1P1V50C = add”vert«x(HlPl,342.1.831.1); 
HlPlV50d = add_vertex(Hl PI.342.1.724.0); 
HlPlV50e = add_veilex(HlPl,103.3.724.0); 
H1 PI V50f = add_verlex(H 1P1,103.3,760.4); 

H1P1V51 = add_venex(HlP1.98.0,760.4); 
H1P1V52 = add^vertexCHl PI ,98.0,564.5); /• 
HlPIV52a = add_vertex(HlPl,103.3,564.5); 
HlPlV52b = add_vertex(HlPl.103.3.599.5); 
H1P1V52C = add”veilex(Hl PI ,342.1.599.5); 
HlPlV52d = add_vertex(Hl PI .342.1.492.4); 
HlPlV52e = add_vertex(HlPl,103.3.492.4); 
H1 PI V52f = add_verlex(H I PI. 103.3.528.8); 

H1P1V53 = add_vertex(Hl PI,98.0.528.8); 
H1P1V54 = add”vertex(HlPl.98.0.413.9); /* 
H1P1V55 = add”vertex(HlPl.257.9,413.9); /' 
HlPlV55a = add vertex(HlPl,257.9.419.2); 
HIPlV55b = add" vertex(HlP1.221.7.419.2); 
H1P1V55C = add_vertex(HlPl,22l.7..S00.0); 
HlPlV55d - add”veitex(HlP1.300.0,.500.0); 
HlPlV55e = add”vertex(Hl PI .300.0,419.2); 


rm 529 */ 


rm 527 */ 


nti 525 */ 


rm 523 •/ 


rm 521 */ 


rm 519 */ 


comers •/ 
rm ? */ 
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HlPlV55f = «dd_vertex(HlPl .293.9.419.2); 

H1PIV56 = add_ver1ex{HlP1.293.9.4I3.9); 

H1PIV57 = add_verlex(HlPl,337.5,413.9): 

H1P1V58 = add_vertex(HlPl,337.5,402.6): /• office •/ 
HlPlV58a = add_vertex(HlP1.342.8,402.6): 

HlPlV58b = add~vertex(Hl PI,342.8,600.0); 

H1P1V58C = add_verlex{Hl PI.449.9.600.0); 

HlPlV58d = add_venex(Hl PI,449.9.330.0); 

HlPlV58e = add~vertex(HlPl.342.8.330.0); 

HlPlVS8f = add_v6rtex(HlPl ,342.8,342.6); 

H1P1V59 = add_vertex(Hl PI,337.5,342.6): 

HIP1V60 = add_vertex(HIPl,337.5,310.2): /* rm 511 •/ 
HlPlV60a = add_vertex(HlPl,342.8.310 2); 

HlPlV60b = add_verlex(HlPl,342.8.315.0); 

H1P1V60C = add_vertex(HlPI,449.9,315.0); 

HlPlV60d = add_vertex(HlPl ,449.9,0.0); 

HlPlV60e = add_vertex(Hl PI ,342.8,0.0); 

HlPlveOf = add_ver 1 ex(Hl PI ,342.8,274.5); 

H1P1V61 = add_vertex(HlP1.337.5,274.5); 

H1P1V62 = add_vertex(HlP1.337.5.267.4); 

H1P1V63 = add_vertex(HlP1.306.9.267.4); /• elev 1 (left)*/ 
HlPlV63a = add_verlex(HlP1.306.9,267.7); 

HlPlV63b = add~vertex(HlP1.303.9,267.7); 

H1P1V63C = add_vertex(HlP1.303.9.255.7); 

HlPlV63d = add~vertex(HlP1.277.9,255.7); 

HIPlV63e = add2veriex(HIPl,251.9,255.7); 

H1 PI V63f = add~vertex(H 1 PI .251.9.267.7); 

HlPlV63g = add~vertex(HlP1.248.9.267.7): 

H1P1V64 = add_vei1ex{HlP1.248.9,267.4); 

H1P1V65 = add^venexfHl PI, 192.2.267.4): 


HlPlV65a = add_vertex(Hl PI, 192.2,267.7); 

HlPlV65b = add_vettex(HlPl,189.2,267.7): 

H1P1V65C = add_vertex(HlPl,189.2.255.7); 

HlPlV65d = add_vertex(HlPl.163.2,2.55.7); 

HlPlV65e = add~vertex(HlPl,137.2,255.7): 

HI PI V65f = add_vertex(H 1 PI. 137.2.267.7); 

HIPlV65g = add_vertex(HlPl,134.2,267.7); 

H1P1V66 = add_vertex(Hl PI. 134.2,267.4); 

H1P1V67 = add_vertcx(Hl PI ,98.0.267.4); 

H1P1V68 = add_vertex(HlP1.98.0,100.0); /* stairwell */ 
HlPlV68a = add_verlex(HlPl,103.3.100.0); 

HlPlV68b = add_vertex(HlPl,103.3.125.0); 

H1P1V68C = add_vertex(HIPl.150.0.125.0); 

HlPlV68d = add~vertex(Hl PI, 150.0,40.0); 

HIPIV68e = add_venex(HlPl,103.3,40.0); 

HIPlV68f = add venex(HlPl,103.3.64.3); 

H1P1V69 = add_vertex(Hl PI .98.0,64.3); 

HIP1V70 = add_vertex(Hl PI .98.0,0.0): 

HlP2=add_pg(Hl,102.0,0,1); /*main ceiling*/ 

H1P2V1 = add_vettex(HlP2,0.0.0.0); 

H1P2V2 - add”venex(HlP2.0.0.2351.2); 

H1P2V3 = add~vertex(HlP2.98.0.2351.2); 

H1P2V4 = add~venex(HIP2,98.0,0.0); 

HIP3 = add_pg(H 1,113.3,0.1); /*elev ceiling*/ 
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H1P3V1 - add_vertex(HlP3.98.0,267.4); 

H1P3V2 = «dd~vertex(HlI>3,98.0.413.9); 

HIP3V3 = add"verlex(HIP3.337.5.413.9): 

H1P3V4 = add”veilex(HlP3.337.S.267.4). 

HIP4 = add_pg(H 1,84.0.0.1); /*rm 506 door jam ceiling*/ 
H1P4V1 = add_vertex(HlP4.0.0.239.5); 

H1 P4V2= add~vertex(H 1 P4,-5.3.239.5); 

H1P4V3 = add~vettex(H 1P4 ,-5.3.275.2); 

H1 P4V4= add~vertex(H 1P4.0.0.275.2); 

H1P5 = add_pg(H1.84.0.0.1); /*rm 510 door jam ceiling*/ 
H1P5V1= add_vertex(HlP5,0.0.713.7); 

H1P5V2= add~vertex(HlP5.-5.3.713.7); 

H1P5 V3 = add~vertex{H 1P5 .-5.3.749.4): 

H1P5V4= add~vertex(HlP5.0.0.749.4); 

H1P6 = add_pg(Hl.84.0.0,1); /*rm 512 door jam ceiling*/ 

H1P6V1 = add_vertex(H 1P6.0.0.825.9); 

H1P6V2= add~venex(HlP6.-5.3.825.9); 

H1P6V3= add_veitex(HlP6.-5.3.861.6); 

H1P6V4= add~veriex(HlP6,0.0.861.6). 

H1P7 = add_pg(Hl,84.0,0,l); /*rm 514 door jam ceiling*/ 
H1P7V1 = add_vertex(HlP7,0.0.937.5); 

H1P7V2 = add_veftex(H 1 P7.-5.3,937.5); 

H1P7V3 = add_vertex(H 1 P7.-5.3,973.2); 

H1 P7V4= add_vertex(H 1 P7.0.0,973.2); 

H1P8 = add_pg{H 1,84.0.0,1); /*rm 516 door jam ceiling*/ 

HIP8 V1 = add_vertex(H 1 P8.0.0.1049.7); 

H1P8 V2 = add~vertex(H 1 P8.-5.3,1049.7); 

H1P8 V3 = add~vertex(H 1P8 .-5.3,1085.4); 

H1P8V4 = add”vertex(H 1 P8.0.0.1085.4); 

HIP9 = add_pg(Hl.84.0.0,1): /*nn 518 door jam ceiling*/ 
HlP9Vl=add vertex(HlP9.0.0.1161.7); 

H1P9V2 = add’vettexCH 1 P9.-5.3.1161.7); 

H1P9V3 = add_vertex(H 1P9 ,-5.3.1197.4); 

H1P9V4= add_vertex(HlP9,0.0.1197.4); 

HIPIO = add_pg{H 1,84.0,0,1); /*rm 520 door jam ceiling*/ 

H1PIOV1 = add_vertex(H 1 PI 0.0.0,1273.4); 

H1P10V2 = add"vertex(H 1 PI 0.-5.3,1273.4); 

H1P10V3= add2vertex(HIP10,-5.3.1309.1); 

HIP10V4= add_vert«x(HlP10,0.0,1309.1); 

HlPll = add_pg(Hl,84.0,0,1); /*rm 522R door jam ceiling*/ 
H1P11V1 = add_verUx(HlPl 1,0.0,1429.6); 

H1 PI 1V2 = add_vetlex(H 1 PI 1 .-5.3.1429.6): 

H1P11V3 = add~vertex(H 1P11 .-5.3.1461.3); 

HlPl IV4= add\ertex(HlPl 1,0.0.1461.3); 

H1P12 = add_pg(Hl,84.0,0,1); /*rm FD 1 door jam ceiling*/ 
H1 PI 2V1 •= add_vertex(H 1P12,0.0.1488.0); 

H1 PI 2V2 = add”vertex(H 1 PI 2,-5.5,1488.0); 

H1 PI 2V3 = add~veilex(H 1P12,-5.5,1560.0); 

H1P12V4- add_vertex(HlPI2.0.0,1560.0); 

HIP13 « add_pg(H 1.84.0,0,1); /‘rm 524 door jam ceiling*/ 
H1P13V1= add vertex(HlP13,0.0,1583.3); 

H1P13V2= add~vettex(HlP13,-5.3,1583.3); 

H1P13V3» add vei1ex(HlP13,-5.3,1619.0); 

H1P13V4- add"vertex(HlP13,0.0.1619.0); 

HI PI4 « add_pg(H 1,84.0,0,1); /• 526R ceiling*/ 

H1P14V1« add_vertex{H 1 P14,0.0.1754.5); 

H1P14V2 = add”vertex(H 1 PI 4.-5.3.1754.5); 

H1 PI 4V3 = add"vertex(H 1P14,-5.3,1786.2); 

H1P14V4 = add_vertex(H 1 PI 4.0.0.1786.2): 

HI PI 5 = add j)g(H 1,84.0,0,1); /*rm 528A door jam ceiling*/ 
H1 PI 5V1 = add_vertex(H 1 PI 5.0.0.1836,4). 
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H1P15 V2 = add_vertex(H 1 PI 5.-5.3.1836.4); 

HI PI 5V3 = add_vertex(H 1 PI 5,-5.3,1872.1); 

HIP15V4 = add~veilex(H I PI 5.0.0.1872.1); 

HIPI6 = add_pg(HI.84.0,0.1); /*rm 528B door jam ceiling*/ 
H1P16V1 = add_vertex(HlP16.0.0,1919.1); 

H1P16V2= add_vertex(HIPI6,-5.3,1919.1); 

HIP16 V3 = add_verlex(H 1P16,-5.3,1954.8); 

H1P16V4= add~vertex(HlP16.0.0.1954.8); 

H1P17 = add_pg(H 1.84.0,0,1); /•rm 530A door jam ceiling*/ 
H1P17V1 = add_vei1ex(HlP17,0.0,2030.4); 

HI PI 7V2 = add~vertex(H 1 PI 7,-5.3,2030.4); 

H1P17V3 = add_vertex(H I PI 7.-5.3.2066.1); 

H1P17V4 = add_venex(H IP17.0.0.2066.1); 

H1P18 = add_pg(H 1.84.0,0,1); /*rm 530B door jam ceiling*/ 
H1 PI 8V1 = add_verlex(H 1 PI 8,0.0,2195.1); 

H1P18V2= add_vertex(HlPI8.-5.3,2195.1); 

H1P18V3= add~venexfHlPI8,-5.3,2230.8); 

H1 PI 8V4 = add_vertex(H 1 PI 8,0.0,2230.8); 

H1P19 = add_pg(Hl,84.0.0,1); /*rm 530C door jam ceiling*/ 
HIP19V1 = add_vertex(H 1 PI 9.0.0.2253.8); 

H1 PI 9V2 = add~venex(H 1 PI 9,-5.3,2253.8); 

HI PI9V3 = add_vertex(H 1 P19.-5.3.2289.5); 

H1P19V4= add~vertex(HlP19,0.0,2289.5); 

HIP20 = add_pg(H1.84.0,0.1); /*rm 421 door jam ceiling*/ 

H1P20V1 = add_vertex(H 1 P20.98.0,2171.9); 

H1P20V2= add3vertex(HlP20,103.3.2171.9); 

H1P20V3 = add~verlex(H IP20,103.3.2136.2); 

H1P20V4 = add~vertex(H 1 P20.98.0.2136.2); 

H1P21 = add_pg(Hl,84.0,0,1); /*rm531 door jam ceiling*/ 
HIP21VI = add_vertex(HlP21,98.0,1937.7); 

H1P21V2= add~vertex(HlP21,l03.3,l937.7); 

H1P21V3 = add"vertex(H 1P21.103.3.1877.7); 

H1P21V4 = add”vertex(H 1P21,98.0.1877.7); 

H1P22 = add_pg(H 1,84.0,0,1); /*rm 529 door jam ceiling*/ 
H1P22V1 = add_vertex(HlP22.98.0.1744.5); 

HIP22V2 = add\ertex(H 1P22,103.3,1744.5); 

H1P22V3 = add~verlex(H 1 P22.103.3.1684.5); 

H1P22V4 = add~venex(H 1 P22.98,0.1684.5); 

H1P23 = add_pg(H 1.84.0.0.1); /*rm 527 door jam ceiling*/ 

H1P23V1 = add_vertex(H 1 P23.98.0.1522.4); 

H1P23 V2 = add_venex(H 1P23,103.3.1522.4): 

H1P23V3= add veriex(HlP23,103.3.1462.4); 

HI P23V4= addJvertex(H 1 P23.98.0.1462.4); 

H1P24 = add jg(H 1,84.0,0.1); /*nn 525 door jam ceiling*/ 
H1P24V1 = add_vertex(HlP24,98.0.1342.7); 

H1P24V2 = add_vertex(H 1P24,103.3.1342.7); 

H1P24V3 = add_vertex(H IP24.103.0.1307.0); 

H1P24V4 = add”vertex(H 1P24,98.0,1307.0); 

H1P25 = add_pg(Hl,84.0,0,l); /‘rm 523 door jam ceiling*/ 
H1P25VI = add_vertex(HlP25,98.0.1118.8); 

H1P25 V2 = add_vertex(H 1P25.103.3.1118.8); 
HlP25V3=add~veilex(HIP25,103.3.1083.1); 

H1 P25V4= add_vertex(H 1P25.98.0,1083.1): 

HIP26 = add_pg(H 1,84.0,0,1); /*rm 521 door jam ceiling*/ 
H1P26V1 = add_veitex(HlP26,98.0,796.1); 

H1P26 V2 = add~vertex(H 1P26,103.3,796.1); 

H1P26V3 » add_vertex(H 1P26,103.3,760.4); 

HIP26V4= add~veilex(HIP26.98.0.760.4): 

H1P27 = add_pg(HI,84.0.0,l); /*rm 519 door jam ceiling*/ 

H1P27V1 = add_veflex(H 1 P27,98.0.564.5): 

H1P27V2 = add_venex(H IP27.103.3.564.5); 

H1P27V3 = add"vetlex{Hl P27.I03.3,528.8); 
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HIP27V4- «dd_vertex(HlP27,98.0,528.8); 

H1K8 = add_pg(HI,84.0,0,I)', /*rtn ? door jam ceiling*/ 

H1P28V1 = add_vettex(H 1 P28.257.9,413.9). 

H1P28V2= add”venex(HIP28.257.9.419.2); 

H1P28V3 = add~vertex(H 1P28,293.9,419.2); 

H1P28V4 = add^veitexCH 1 P28.293.9.413.9); 

H1P29 = add_pg(Hl,84.0,0,1); /* office door jam ceiling*/ 
H1P29V1 = add_venex(HlP29.337.5,402.6); 

H1P29V2 = add~vertex(H 1 P29,342.8,402.6); 

H1P29V3* add"vertex(HlP29.342.8,342.6); 

H1P29V4 = add_vertex(H 1 P29,337.5,342.6); 

H1P30 = add_pg(Hl,84.0,0,l); /* rm 511 door jam ceiling*/ 
HIP30V1 = add_veriex(HlP30,337.5,310.2); 

H1P30V2 = add_vertex(H 1 P30,342.8.310.2); 

H1P30V3 = add_vertex(H 1 P30.342.8.274.5); 

H1P30V4 = add_vertex(H 1 P30,337.5.274.5); 

H1P3I = add_pg{Hl,83.8,0,1); /* elev 1 door jam ceiling*/ 
H1P31V1 = add_vei1ex(H 1P31,303.9,267.7); 

HIP31V2* add_venex(H 1P31,303.9.255.7); 

H1P31V3 = add_vertex(H 1P31,277.9,255.7); 

H1P31 V4= add_vertex(Hl P31.251.9.255.7); 

H1P31V5 = add_veriex(H 1P31.251.9,267.7); 

H1P32 = add_pg(Hl,83.8.0,l); /* elev 2 door jam ceiling*/ 
H1P32V1 = add_vertex(H 1P32.189.2,267.7). 

H1P32V2 = add_vettex(H 1P32.189.2.255.7). 

H1P32V3 = add~verlex(H 1P32.163.2.255.7); 

H1P32V4 = add^vertexfH 1P32.13 7.2.25 5.7); 

H1P32V5 = add”vettex(H 1P32.137.2.267.7): 

H1P63 = add_pg(Hl,86.8,0.1); /* elev 1 ceiling*' 
HIP63V1= add vertex(HlP63.306.9,267.4); 

H1P63 V2 = add_vertex(H IP63.306.9.267.7); 

HIP63V3= add venex(HlP63,248.9.267.7); 

H1P63V4= add vertex(HlP63.248.9.267.4); 


H1P64 = add_pg(H1.86.8.0,l); /* elev 2 ceiling*/ 

HIP64V1 = add_vetrex(HIP64.192.2.267.4); 

H1P64V2= add_vertex(HlP64.192.2.267.7); 

H1P64V3 = add”vertex(H 1P64,134.2.267.7); 

H1P64V4= add_venex(H IP64.134.2,267.4); 

H1P33 = add_pg(H 1,84.0,0,1); /* tiairwell door jam ceiling*/ 
H1P33V1 = add_veflex(H 1P33.98.0.100.0); 

H1P33 V2 = add”vettex(H 1P33,103.3,100.0); 

H1P33 V3 = add_veilex(H 1P33.103.3.64.3); 

H1P33V4- add”veilex(HlP33,98.0.64.3); 

H1P34 - add_pg(HI,144.0,0.1); /*rm .506 ceiling*/ 

H1P34V1 = add_veilex(H 1 P34.-5.3.203.3); 

H1P34V2 = add\eilex{H 1 P34,-244.1.203.3); 

H1P34V3 - add^vertexfH I P34,-244.1.309.4); 

H1P34V4 - add"vertex(H 1P34 ,-5.3,309.4); 

H1P35 - add_pg(Hl,144.0,0,1); /‘rm 510 ceiling*/ 

HIP35V1 - add_veilex{HlP35.-5.3.677.5); 

H1P35V2- add~veftex(HlP35.-244.1,677..5); 

H1P35V3- add vertex(HIP35,-244.1,783.6); 

H1P35V4 - add“veitex(H 1P35 .-5.3.783.6); 

H1P36 - add_pg(H 1,144.0,0.1); /* rm 512 ceiling*/ 
HIP36V1- add_vertexfHIP36.-5.3.789.7); 

H1P36V2- add_vertex(H 1 P36.-244,1.789.7); 
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H1P36V3 = «dd_vetlex(H 1 P36.-244.1.895.8); 

H1P36V4= •dd_vertex(HlP36.-5.3.895.8); 

H1P37 = add_pg{H 1,144.0.0,1); /*rm 514 ceiling*. 
H1P37V1= «dd_vertex(HlP37.-5.3.901.3); 

H1P37V2= add_veriex(HlP37.-244.1.901.3); 

H1P37V3 = add_verlex(H 1 P37.-244.1.1007.4); 

H1P37V4 = add_vertex(H 1P37 ,-5.3.1007.4); 

H1P38 « add_pg(Hl,144.0,0,1); /•rm 516 ceiling*/ 
H1P38V1= add_vertex(HlP38,-5.3,1013.5); 

H1P38V2= add”vertex(HlP38.-244.1,1013.5); 

H1P38V3= add~vertex(HlP38.-244,l,l 119.6); 

H1P38V4= add_vertex(HlP38.-5.3.1119.6); 

H1P39 = add_pg(Hl,144.0,0,1); /’rm 518 ceiling*/ 

H1P39V1 = add_vertex(H 1 P39,-5.3.1125.5); 

H1P39V2 = add_vertex(H 1 P39,-244.1,1125.5); 

H1P39V3 = add_vertex(H 1 P39,-244.1.1231.6); 

H1P39V4 = add_vertex(H 1 P39,-5.3.1231.6); 

H1P40 = add_pg(Hl,144.0.0.1); /*mi 520 ceiling*/ 

H1P40V1 = add_vertex(H 1 P40,-5.3.1237.2); 

H1P40V2= add_venex(HlP40.-244.1,1237.2). 

H1P40V3 - add_verlex(H 1 P40.-244.1.1343.3); 

H1P40V4 = add_vertex(H 1 P40.-5.3.1343.3); 

H1P41 = add_pg(H 1.144.0.0.1); /*rin 522R ceiling*/ 

H1P41V1 = add_ver1ex(H 1P41 .-5.3.1393.4); 

H1P41V2 = add_vertex(H 1P41 .-244.1.1393.4); 

H1P41V3 = add~vertex(H 1P41 .-244.1.1499.5); 

H1P41V4 = add_vertex(H 1P41 .-5.3.1499.5); 

H1P42 = add_pg(Hl,144.0.0.1); /* FDl ceiling*/ 

H1P42 V1 = add_vertex(H 1P42 .-5.5.1486.0); 

HI P42V2 = add%ertex(H 1 P42.-50.0.1486.0); 

H1P42V3 = add_vertex(H 1 P42.-50.0.1562.0); 

HI P42V4= add\ertex(H 1 P42.-5.5.1562.0); 

H1P43 = add_pg(Hl.144.0.0.1); /*rm 524 ceiling*' 
H1P43V1 = add vertex(HlP43.-5.3.1.547.1); 

H1P43V2 = add"vertex{H 1 P43.-244.1,1547.1); 

HI P43V3 = add_veftex(H 1 P43,-244.1,1653.2); 

H1P43 V4 = add~vertex(H 1P43 .-5.3.1653.2); 

H1P44 = add_pg(Hl.84.0,0.1); /* water fountain ceiling* 
H1P44V1 = add_vertex(H 1 P44,0.0.1650.4); 

H1P44V2 = add_venex(H 1 P44.-30.0.1650.4); 

H1P44V3 = add~vertex(H 1 P44.-30.0.1684.5). 

HI P44V4= add_vertex(H 1 P44.0.0.1684.5); 

H1P45 = add_pg(Hl,144.0,0.1); /*nn .526R ceiling*/ 

H1P45 V1 = addveitexCH 1P45 .-5.3.1718.3); 

H1P45 V2 = add~veflex(H 1P45 .-244.1.1718.3); 

H1P45V3- add_vertex{H 1 P45.-244.1.1790.0); 

HIP45V4- add~vertex(H 1 P45,-5.3.1790.0): 

H1P46 = add_pg(Hl,144.0.0.1); /‘rm 528A ceiling*/ 
H1P46V1« add_vertex(HlP46,-5.3.1800.2); 

H1P46V2 - add~vertex(H 1 P46.-244.1.1800.2); 

H1P46V3 » add”vertex(H 1 P46,-244.1,1875.0); 

H1P46V4» add_veilex(H 1 P46,-5.3.1875.0); 

H1P47 = add_pg(H 1,144.0,0,1); /*rm 528B ceiling*/ 

H1P47V1. add_vertex(H 1 P47.-5.3.1882.9); 

H1P47V2 = add“vertex{H 1 P47.-244.1,1882.9); 

H1P47V3 = add_vertex(H 1 P47,-244.1,1989.0); 

H1P47V4 - add_verlex(H 1 P47,-5.3.1989.0); 

H1P48 “ add_pg(Hl,144.0.0.1); /*rni 530A ceiling*/ 
H1P48V1 - add_venex(HlP48.-5.3,1994.2); 

H1P48V2 - add~vertex(H 1 P48,-244.1.1994.2); 

H1P48V3- add’vertexfH 1 P48.-244.1,2100.3); 

H1P48V4= add”vertex(HlP48.-5.3,2100.3); 










H1M9 - •dd_pj(Hl,144.0.0,1); /•rm 530B ceiling*/ 

H1P49VI - add_veitex(HlP49,-5.3.2158.8); 

H1IM9V2- •dd"vertex(HlP49.-244.1.2158.8): 

HI P49V3 = add_vertex(H 1 P49.-244.1.2250.0); 

H1P49V4= add”vertex(HlP49,-5.3.2250.0); 

H1P50 = add_pg(Hl.144.0.0.1); /•rm 530C ceiling*/ 

H1P50V1 = add_venex(HlP50,-5.3.2251.0): 

H1P50V2= add~veftex(HlP50,-244.1.2251.0); 

H1P50V3 = add_veilex(H 1 P50,-244.1.2350.0); 

H1P50V4- add_veilex(H 1 P50,-5.3.2350.0): 

/* following ceilings are incorrect based on 35* to eilhei side of door*/ 

H1P51 = add_pg(Hl.144.0,0.1); /*rm 421 ceiling*/ 

H1P51V1 = add_verlex(H 1P51.103.3.2206.6); 

H1P51V2 » add'vettexfH 1P51,342.1,2206.6); 

H1P51V3 = add”veilex(H 1P51,342.1,2099.5); 

H1P51V4 = add~vertex(H 1P51,103.3.2099.5): 

H1P52 = add_pg(Hl,144.0,0,1); /*rm 531 ceiling*/ 

H1P52V1 = add_venex(H 1P52,103.3.1972.7); 

H1P52V2= add_vertex(HlP52,342.1,1972.7); 

H1P52 V3 = add_vertex(H 1 P52,342.1.1865.6); 

H1P52V4 = add~verlex(H 1P52.103.3.1865.6): 

H1P53 = add_pg(H 1,144.0.0.1); /*rm 529 ceiling*/ 

H1P53 V1 = add_vertex(H 1P53.103.3,1779.5); 

H1P53 V2 = add_vertex(H 1P53.342.1.1779.5): 

H1P53 V3 = add\ertex(H 1P53,342.1.1672.4); 

H1P53 V4 = add'vertexfH 1P53.103.3,1672.4); 

H1P54 = add_pg(Hl.144.0.0.1); /*rm 527 ceiling*/ 

H1P54V1 = add_vertex(H 1P54.103.3.1557.4); 

H1P54V2- add vertex(HlP.54.342.1.1.557.4); 

H1P54V3 = add\ertex(H 1 P54,342.1.1450.3): 

HIP54 V4 = add_vet1ex(H 1P54.103.3.1450.3); 

H1P55 = addjjgCHl.144.0,0.1); /*rm 525 ceiling*/ 

H1P55V1 = add_venex(HlP55.103.3.1377.7); 

H1P55V2 = add_vertex(H 1 P55.342.1,1377.7); 

H1P55 V3 = add”vertex(H 1 P55,342.1.1270.6); 

H1P55 V4 = add\ertex(H 1P55.103.3.1270.6); 

H1P56 = add_pg(Hl.144.0.0.1); /*rm 523 ceiling*/ 

H1P56V1 = add_veilex(H 1P56.103.3.1153.8); 

H1P56V2- add~vettex(HlP.56.342.1,1153.8); 

H1P56V3- add~vertex(H 1 P56.342.1.1046.7); 

HIP56 V4 = add_vertex(H 1P56.103.3.1046.7); 

H1P57 = add_pg(H 1,144.0,0,1); /*rm 521 ceiling*/ 

H1P57V1 = add_vettex(H IP57.103.3.831.1); 

H 1 P57V2 = add”veriex(H I P57.342. 1 .83 1 . 1 ); 

H1P57V3- add~vett*x(HlP57.342.1,724.0); 

HIP57V4 = addIvettex(H 1P57,103.3,724.0); 

HIP58 = add_pg(H 1.144.0.0,1); /*rm 519 ceiling*/ 

H1P58V1« add_vertex(HlP58.103.3.599.5); 

HIP58V2- add”vertex(HlP58,342.1.599.5); 

H1P58V3 = add~vertex(H 1 P58,342.1,492.4); 

H1P58V4- add”veitex(H 1P58,103.3.492.4); 

H1P59 “ add_pg(H 1,144.0,0,1); /*mi ? ceiling*/ 

HIP59V1» add_veitex(HlP59,221.7,419.2); 

HIP59V2 » add~vettex(H 1 P59.221.7.500.0); 

H1P59V3 - add“veitex(H 1 P59.300.0.500.0); 

H1P59V4« add^vertexfH I P59.300.0.419.2); 

H1P60 • add_pg(H 1,144.0,0,1); /* office ceiling*/ 

H1P60V1 - add_veitex(HlP60.342.8,600.0); 

H1P60V2- add2vef1ex(HlP60,449.9.600.0); 

H1P60V3- add~vertex(H 1 P60.449.9.330.0); 
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H1P60V4= «dd_vertex{HIP60,342.8,330.0); 

HIP61 » idd_pgCH 1.144.0.0.1): /*nn 511 ceiling*/ 

H1P61V1 = add_vertex(H 1P61.342.8.315.0); 

H1P61V2 = add\ertex(H 1P61.449.9.315.0); 

H1P61V3= add~vertex(HlP61,449.9.0.0): 

H1P61V4 = add_vei1ex(H 1P61.342.8.0.0); 

H1P62 = add_pg(Hl. 144.0.0.1); /‘rm stairwell ceiling*/ 

H1P62V1 = add_vettex(H 1P62,103.3.125.0); 

H1P62V2 = 8dd_verlex(H 1P62,150.0.125.0); 

H1P62V3 = add_vertex(H 1P62,150.0,40.0); 

H1P62V4 = add~vertex(H 1P62,103.3.40.0); 

/* Don't forget to add the ceiling associations or else we can't tell 
how high each section of the hallway is*/ 

add_ceiling(HlPl,HlP2); 

add3eiling(HlPl,HlP3); 

add~ceiling(HIPl,HlP4); 

add"ceiling(HlPl.HlP5); 

add_ceiling(HlPl,HlP6); 

add_ceiling(HlPl.HIP7); 

addIceiling(HlPl,HlP8): 

add~ceiling(HlPl.HlP9); 

add"ceiling(HlPl,HlPI0); 

add~ceiling(HIPI.HlPlt); 

add_ceiling(HIPI,HlP12): 

add~ceiling(HlPl,HlP13); 

add~ceiling(HlPl,HlPI4); 

add”ceiling(HlPl,HlP15); 

add_ceiling(HlPl.HlP16): 

add_ceiling(HlPl.HlP17); 

add2ceiling(HlPl.HlP18); 

add2ceiling(HlPl,HlP19); 

add_ceiling(HlPl.HlP20); 

add2ceiling(HlPl.HlP21): 

add2ceiling(HlPl,HlP22); 

add.ceiling(HIPI.HIP23): 

add'ceiling(HlPI.HlP24); 

add"eeiling(HlPI,HlP25); 

add^ceilingCH 1 PI .H1P26). 

add”ceiling(HlPl.HlP27): 

add_ceiling(HlPl.HIP28): 

add3eiling(HIPl.HlP29); 

add_ceiling(HlPI.HlP30); 

add'ceiling(HIPl,HlP3l): 

add'ceiling(HlPI.HIP32): 

add_ceiling(Hl PI .H1P33); 

add~ceiling(H 1 PI .H1P34): 

add”eeiling(HIPl.HlP35); 

add_ceiling(HlPl.HlP36); 

add'ceilingfHl PI .H1P37); 

add'ceiling(HlPI,HlP38); 

add~ceiling(HlPl.HIP39); 

add_ceiling(HlPl.HIP40); 

add_ceiling(H 1 PI ,H 1P41): 

add3ceiling(HlPl,HlP42); 

add'ceilingfH 1 PI .HIP43): 

add~ceiling(HIPl.HIP44): 

add~ceiling(HlPl.HlP45); 

add_ceiling(HlPI,HIP46); 

add^ceilingfH 1 PI .HIP47); 

add~ceiling(HIPl.HIP48): 
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•dd_eemnj(HlPl,HlP49); 
add_ceilin8(HIPI.HlP50); 
add_ceilin8(HIPI.HlP5I): 
add~ceiling(HlPl,HlP52): 
add_ceiling(HlPl .H1PS3). 
add~ceiling(HlPl.HlP54); 
add~ceiling(HlPl,HlP55), 
add”ceiling(HlPl.HlP56); 
add_ceiUng(H 1 PI ,H 1P57). 
add_cemng(HlPI,HlPS8); 
add_ceiling(HlPl.HIP59); 
add_ceiiing(HlPI,HlP60); 
add_ceiling(H IP) .H1P61): 
add_ceiling(HIPl,HlP62); 
add_ceiling(H I PI .H1P63); 
add_ceiling(HlPl.HlP64); 

/* Vertical edges must alway be expliciti} added */ 

add_edge(H I PI V1 ,H 1P2V1): 

add_edge(HlPlV2,HlP4Vl); /‘link up vert edges of room 506*/ 

add~edge(H 1 PI V2a.H 1P4V2): 

add'edgefH I PI V2b,H IP34VI); 

add~edge(H 1 PI V2c ,H 1P34V2); 

add%dge(H I PI V2d.H 1P34V3): 

add_edge(H 1 PI V2e,H 1P34V4); 

add~edge(H I PI V2f,Hl P4V3). 

add'edgefH 1 PI V3, HIP4 V4); 

add_edge(HlPlV4,HlP5V|); /‘link up vert edges of room 510*/ 

add~edge(H 1 PI V4a.H 1P5V2); 

add~edge(H 1 PI V4b,H 1P35V1); 

add~edge(H 1P1 V4e .HIP35 V2): 

add~edge(HlPIV4d.HlP35V3), 

add edge(HlPlV4e,HlP35V4); 

add~edge(H 1 PI V4f.H 1P5 V3); 

add~edge(H 1 PI V5,H 1P5 V4); 

add_edge(HlPI V6,HIP6VI); /*link up vert edges of room 512 */ 

add~edge(H I PI V6a,H IP6 V2); 

add%dge(H 1 PI V6b.H 1P36V1); 

add%dge(H 1 PI V6c .H1P36V2); 

add~edge(H 1 PI V6d,H 1P36V3); 

add~edge(H 1 PI V6e.H IP36V4); 

add~edge(H I PI V6f,H IP6 V3); 

add~edge(H 1 PI V7,H IP6V4); 

add_edge(HlPIV8,HIPTVl); /*link up vert edges of riiom 514*/ 

add~edge(H 1 PI V8a,H 1P7V2); 

add'edgefH 1 PI V8b,H 1P37V1); 

add~edge(H I PI V8c,H IP37V2); 

add^edgefH I PI V8d.H 1P37V3); 

add\dge(H 1 PI V8e.H 1P37V4); 

add'edgefH I PI V8f,H IP7V3); 

add'edgefH 1 PI V9,H 1P7V4); 

add_edgefHIPIVI0,HlP8VI); /*Iink up vert edges of room 516*/ 

add'edgefH 1 PI VlOa.H 1P8V2); 

add^edgefH 1 PI VI Ob.HI P38V1); 

add~edgefHIPlV10c,HIP38V2); 

add'edgefH I PI V lOd.H IP38V3); 

add'edgefH 1 PI V lOe.H 1P38V4); 

add'edgefH 1 PI V tOf.H IP8V3); 

add'edgefHlPlVl 1,H1P8V4); 

add_edgefHlP\V12,HlP9Vl); /*link up vert edges of room 518*/ 
add^edgefH 1 PI V12a,H 1P9V2): 
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add_edge(H 1P1V 12b ,H 1P39V1). 

.dd_edge(H 1 PI V12c,HIP39V2); 

«dd_edge(H 1 PI V12d.H 1P39V3); 
add~edge(H 1 PI V 12e,H 1P39V4); 
add_edge(HlPlV12f,HlP9V3): 
add_edge(H 1 PI V13 .H1P9V4); 

add_edge(HlPlV14,HlP10Vl); /‘link up vert edges of room 520*/ 

add3edge(HlPlV14a,HlP10V2); 

add"edge{HlPlV14b,HlP40Vl); 

add^edgefH 1 PI V 14c,H1P40V2); 

add~edge(H 1 PI V14d,H 1P40V3): 

add_edge(H 1P1V14e, H1P40V4); 

add_edge(H 1 PI V14f,H 1 PI 0V3); 

add_edge(HlPlV15,HlP10V4); 

add_edge(HlPlV16,HlPl IVl); /‘link up vert edges of room 522R‘/ 

add_edge(HlPlV16a,HlPllV2); 

add_edge(HIPIV16b,HlP41Vl); 

add_edge(H 1 PI VI 6c,H 1P41V2): 

add_edge(HlPlV16d.HlP41V3); 

add_edge(HlPlV16e,HlP41V4); 

add”edge(HlPlV16f,HlPl 1V3); 

add_edge{HlPlV17,HIPllV4); 

add_edge(HlPlV18,HlP12Vl): /‘link up vert edges of room FDI‘^ 

add~edge(HlPIV18a.HIP12V2): 

add_edge(HlPlV18b,HlP42Vl); 

add3edge(HlPIV18c,HIP42V2); 

add_edge(HlPlV18d.HlP42V3); 

add”edge(H 1 PI V18e.H 1P42V4): 

add“edge(H 1P1V18f,H 1 PI 2V3); 

add_edge(HlPlV19,HlP12V4); 

add_edge(HlPlV20,HlP13Vl); /‘link up vert edges of room 524‘/ 

add~edge(H 1 PI V20a,H 1 PI 3 V2); 

add”edge(H 1 PI V20b .H1P43 V1 )•. 

add%dge(HlPlV20c.HlP43V2): 

add2edge(HlPlV20d,HIP43V3): 

add"edge{H 1 PI V20e.H 1P43 V4); 

add“edge(HlPlV20f.HlP13V3); 

add_edge(H 1 PI V21 ,H I PI 3V4); 

add_edgefHlPlV22,HlP44VI); /‘link up vert edges of water fountain*/ 
add_edge(H 1 PI V22a.H 1P44V2); 
add_edge(HlPlV22b,HIP44V3); 
add_edge(H 1 PI V23,H 1P44V4); 

add_edge(HlPlV24.HlP14Vl): /‘link up vert edges of room 526R‘/ 

addedgefH 1 PI V24a,H IP14V2); 

addedgefH 1 PI V24b.H 1P45 VI); 

add'edgefHl PI V24C.H 1P45V2): 

add_edge(HIPlV24d,HlP45V3); 

add~edge(H 1 PI V24e,H 1P45V4); 

add_edge(HIPlV24f,HlP14V3); 

add_edge(Hl PI V2S,H 1P14V4); 

add_edge(HlPlV26,HlPI5Vl); /‘link up vert edges of room 528A‘/ 

add_edge(H 1 PI V26a,H 1 PI 5V2); 

add_edge(H I PI V26b.H 1P46V1); 

add edge(HlP1V26c,HlP46V2); 

add“edge(H 1 PI V26d,H 1P46V3); 

add_edge(H 1 PI V26e,H 1P46V4): 

add_edge(H I PI V26f,H 1 PI 5V3); 

add_edge(Hl PI V27,H1 PI5V4); 

add_edge(HlPl V28,H1PI6V1); /‘link up vert edges of room 528B‘/ 
add”edge(H I PI V28a,H I PI 6V2); 
add_edge(H 1 PI V28b,H IP47VI); 
add_edge(H I PI V28c.H 1P47V2); 
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add edge(HlPlV28d,HIP47V3); 
add~edje(H 1 PI V28e,H IP47V4): 
add"edge(H 1P1 V28f.H 1 PI 6V3): 
add“edge(H 1 PI V29.H 1 PI 6V4); 
add_edge(H 1 PI V30,H 1 PI 7V1). 
add_edge(H 1 PI V30a, H1P17V2); 
add_edge(H 1 PI V30b,H 1P48V1); 
add~edge(H 1 PI V30C.H 1P48V2); 
add_edge(HI PI V30d.H 1P48V3); 
add”edge(H I PI V30e,H IP48V4); 
add edge(HIPIV30f,HIPl7V3): 
add~edge(H I PI V31 ,H I PI 7V4); 
add'edge(HlPIV32,HlPI8VI); 
add"edge(H IPI V32a.H I PI 8V2); 
add~edge(H I PI V32b,H IP49VI); 
add_edge(H I PI V32c,HIP49V2); 
add”edge(H I PI V32d,H IP49V3); 
add~edge(H I PI V32e,H IP49V4); 
add_edge(H I PI V32f,H 1 PI 8V3); 
add_edge(H I PI V33 .HI PI 8 V4); 
add_edge(H IPIV34,HIPI9VI); 
add_edge(HIPIV34a,HIPI9V2); 
add_edge(HlPIV34b,HIP50Vl); 
add_edge(H I PI V34c ,H IP50V2); 
add_edge(H I PI V34d.H IP50V3); 
add_edge(HI PI V34e,H IP50V4); 
add“edge(H I PI V34f,H I PI 9V3): 
add”edge{H I PI V35,H IP19V4); 
add~edge(H I PI V36,H IP2V2); 
add”edge(H 1 PI V37,H IP2V3). 
add3edge(H I PI V38.H IP20VI); 
add"edg«(H I PI V38a,H IP20V2); 

add'edge(H IPIV3 8b ,H IP51V1); 

add~edge(H I PI V38c ,H IP51V2); 
add~edge(H I PI V38d,H IP51V3): 
add~edge(H I PI V38e.H IP51V4); 
add”edge(H I PI V38f,H IP20V3); 
add_edge(H I PI V39,H IP20V4); 
add_edge(H I PI V40.H IP2IV1); 
add_edge(H I PI V40a.H IP21V2); 
add edge(HlPlV40b,HIP52Vl); 
add~edge(H I PI V40c ,H IP52V2); 
add”edge(H 1 PI V40d,H IP52V3); 
add”edge(H 1 PI V40e,H 1P52V4); 
add”edge{H I PI V40f.H IP21V3): 
add~edge(H I PI V41 ,H 1P21V4); 
add_edge(H I PI V42,H IP22V1); 
add edge(HlPIV42a,HlP22V2); 
addIedge(H 1 PI V42b,H IP53 V1); 
add edge(HlPlV42c,HIP53V2); 
add~edge(HlPlV42d,HIP53V3); 
add”edge(H I PI V42e,H IP53V4); 
add~edge(H IPI V42f, HIP22 V3); 
add"edge(H 1 PI V43 ,H 1P22V4): 
add”edge(H 1 PI V44,H 1P23 VI); 
add~edge(HlPlV44a,HIP23V2); 
add”edge(HI PI V44b,H IP54VI); 
add~edge(H 1 PI V44c ,H IP54V2); 
add”edge(H 1 PI V44d,H 1P54V3); 
add~edge(H 1 PI V44e,H 1P54V4); 
add”edge(H 1 PI V44f.H 1P23V3); 
add~edge(H 1 PI V45,H 1P23V4): 


/♦link up vert edges of room 530A*/ 


/♦link up vert edges of room 530B^/ 


/♦link up vert edges of room 530C^/ 


/♦corner^/ 

/♦corner^/ 

/♦link up vert edges of room 421^/ 


/♦link up vert edges of room 53I^/ 


/♦link up vert edges of room 529^/ 


/•link up vert edges of room 527^/ 
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add_edge(HlPlV46,HlP24VI); /*link up vert edges of room 525*/ 

«dd_edge(HlPlV46a,HlP24V2); 

add_edge(H 1 PI V46b.H 1PS5 V1); 

add_edge(H 1 PI V46c.H 1P55 V2); 

add_edge(H 1 PI V46d.H 1P55 V3); 

add_edge(HlPlV46e,HlP55V4); 

add^edgeCH 1 PI V46f,H 1P24V3); 

add_edge(H 1 PI V47,H 1P24V4); 

add_edge(HlPlV48,HlP25Vl); /‘link up vert edges of room 523*/ 

add_edge(H 1 PI V48a.H 1P25 V2); 

add”edge(H 1P1 V48b,H 1P56 V1); 

add_edge(H I PI V48c,H 1P56V2); 

add_edge(H 1 PI V48d,H 1P56V3). 

add_edge(H 1 PI V48e.H 1P56V4); 

add_edge{H 1 PI V48f,H 1P25V3); 

add_edge(HlPlV49,HlP25V4); 

add_edge(HlPlV50,HlP26Vl); /’link up vert edges of room 521*/ 

add_edge(H 1 PI V50a .H1P26 V2); 

add_edge(H 1P1 V50b,H 1PS7V1); 

add_edge(HlPIV50c,HIP57V2): 

add_edge(H 1 PI V50d,H 1P57V3); 

add_edge(HlPlV50e,HlP57V4); 

add_edge(H 1 PI VSOf.H 1P26V3); 

add_edge(H I PI V51 ,H 1P26V4): 

add_edge(HlPlV52,HlP27Vl); /*Unk up vert edges of room 519*/ 

add_edge(HlPlV52a,HlP27V2); 

add_edge(H I PI V52b,H 1P58V1). 

add_edge(H 1 PI V52c ,H 1P58V2); 

add'edgefH 1 PI V52d,H 1P58V3): 

add~edge(H 1 PI V52e,H 1P58V4); 

add%dge(H 1 PI V52f.H IP27V3). 

add_edge(H 1 PI V53. H1P27V4); 

add_edge(H 1 PIV54.H 1P3V2); /•comer*/ 

add_edge(HIPlV55.HlP28Vl); /*Unk up vert edges of room ?*/ 

add%dge(HlPI V55a,H 1P28V2); 

add”edge(H 1 PI V55b,H IP59 V1); 

add_edge(H I PI V55c.H 1P59V2); 

add~edge(H 1 PI V55d,H 1P59V3); 

add_edge(H 1 PI V55e,H IP59V4); 

add~edge(H 1 PI V55f,H 1P28V3); 

add_edge(H 1 PI V56 .HIP28 V4); 

add_edge(H 1 PI V57,H1 P3V3); /‘comer*/ 

add_edge(HlPlV58,HlP29Vl); /‘link up vert edges of office 515 */ 

add]^edge(Hl PI V58a,Hl P29V2); 

add~edge(H I PI V58b,H 1P60V1); 

add~edge(HlPlV58c,HlP60V2); 

add”edge(H 1 PI V58d,Hl P60V3); 

add_edge(H 1 PI V58e,H 1P60V4); 

add_edge(Hl PI V58f,H 1P29V3); 

add_edge(H 1 PI V59,H IP29V4); 

add_edge(HlPIV60,HIP30Vl); /‘link up vert edges of room 511*/ 

add~edge(H 1 PI V60a.H 1P30V2): 

add_edge(H 1 PI V60b,H 1P61V1); 

add_edge(H 1P1 V60c, H1P61V2); 

add_edge(H 1 PI V60d,H 1P61V3); 

add_edge(H I PI V60e,H IP61V4); 

add_edge(H I PI V60f.H IP30V3); 

add_edge(H I PI V61 .H1P30V4); 

add_edge(H I PI V62.H IP3V4); /‘comer*/ 


add_edge(HIPIV63,HIP63Vl); /‘link up vert edges of room elev I*/ 
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add_edge(H 1 PI V63a,H 1P63V2) 
idd_edge(H 1 PI V63b,H 1P31V1) 
add_edge(H 1 PI V63c ,H 1P31V2) 
add_edge(H 1 PI V63d,H 1P31V3) 
add^edgeCH 1 PI V63e,H 1P31V4) 
add_edge{H 1 PI V63f,H 1P31V5) 
add_edge(HlPlV63g,HlP63V3) 
add2edge(H 1 PI V64.H 1P63V4); 
add_edge(H 1 PI V65,H 1P64V1); 
add~edge(H 1 PI V65a,H IP64V2) 
add_edge(H 1 PI V65b.H 1P32V1) 
add_edge(H 1 PI V65c,H 1P32V2) 
add~edge(H 1 PI V65d,H 1P32V3) 
add_edge(H 1 PI V65e,H IP32V4) 
add_edge(H 1 PI V65f,H IP32V5) 
add~edge(H I PI V65g,H IP64V3) 
add_edge(H 1PI V66,H IP64 V4); 


/♦link up vert edges, of room elev 2*/ 


add_edge(H I PI V67,H IF3VI); /*corner*/ 

add_edgefHIPIV68.HIP33VI); /’link up vert edges of stairwell*/ 

add_edge(HlPIV68a,HlP33V2); 

add_edge(H I PI V68b.H IP62V1); 

add edgefH I PI V68e ,H IP62V2); 

add_edge{H I PI V68d.H IP62V3); 

addedgefH 1 PI V68e, HIP62V4); 

add_edge(H I PI V68f.H IP33 V3); 

add~cdge(H I PI V69.H IP33V4): 

add^edgefH 1 PI V70,H 1P2V4); /•corner*/ 


/* Now define the different classes of doors and put instances inside the 
door jams */ 

add_instanceChallway",7.HI .O.O.O.O.O.O.O.O.O.O.O.O); 

H2 = add_ph(’ofrtce_doorMl.W.0.l); 

H2PI=add_pg(H2,0.0.I.l); 

H2PIVI = add_vettex{H2PI.O.0,0.O); 

H2PIV2 = add”venex(H2PI.1.75.0.0); 

H2PIV3 = add_vertex(H2PI.1.75.35.5); 

H2PIV4 = add_vertex(H2PI .0.0,35.5). 

H2P2 = add_pg(H2,83.5.0.1); 

H2P2VI = add_vertex(H2P2,0.0.0.0); 

H2P2V2 = add_verlex(H2P2,1.75.0.0); 

H2P2V3 = add~venex(H2P2,1.75,35.5); 

H2P2V4 = add_vertex(H2P2.0.0.35.5); 
add_edge(H2PIVI,H2P2VI); /*link up vert edges of door*/ 
add”edge(H2PIV2,H2P2V2); 
add~edge(H2Pl V3 ,H2P2V3); 
add”edge(H2PI V4,H2P2V4); 

add_ceiling(H2Pl ,H2P2); 

add_in8lance("door506",7.H2,-5.3,239.6,0.2.0.0,0.0,0.0); 
addJnsunceCdoor510',7,H2.-5.3,7l3.8.0.2.0.0.0.0,0.0); 
add_insta ncefdoorS 12 ■,7,H2.-5.3,861.5,0.2.0.0,35.5,0.0); 
add Jnslance(*door514”,7,H2,-5.3,937.6,0.2,0.0,0.0,0.0); 
add jnaunceCdoor516’,7,H2.-5.3.1085.3.0.2,0.0,35.5.0,0); 
add jnslaneeCdoor518-,7,H2.-5.3,1161.8,0.2,0,0.0.0.0.0); 
add~in5tance(-door520-.7.H2.-5.3.1309,0.0.2.0.0.35.5.0.0); 
add jnstanceCdoor524",7,H2.-5.3.1618.9.0.2.0.0,35.5.0.0); 
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add_insuinceCdoor528A",8,H2,-5.3,1836.5.0.2.0.0.0.0.0,0); 
addJnslance("door528B",8,H2.-5.3,1919.2.0.2.0.0.0.0.0.0); 
add_instanceCdoor.S30A".8.H2.-.‘'.3.2030..S.0.2.0.0.0.0.0.0); 
add_insunce("door530B”.8 H2.-,S.3.2230.7,0.2.0.0.3,S..S.O.O); 
add_insUnce("door530C".8.H2.-5.3.22.S3.9,0.2.0.0,0.0.0.0); 
add_inslance("door421'.7,82,103.3.2136.3.0.2. l.T-S.O.O.O.O); 
add_instancerdoor525",7.H2.103.3,1342.6.0.2.1.75.35.5.0.0); 
add_inslance("door523".7.H2.103.3.1118.7,0.2.1.75.35.5.0.0); 
add_msunceCdoor52r,7.H2.103.3.796.0.0.2.1.75.35.S.0.0); 
addJnstance("door519“.7.H2.103.3..564.4.0.2.1.75,35.5.0.0); 
add_inslance("door?’,5,H2,293.8.415.65.0.2.0.0,35.5.90.0); 
add_instance("door511 ■,7,H2,342.8.310.1.0.2.1.75.35.5,0.0); 
add_instance(’doorsuirs',10,H2,103.3.64.4.0.2,1.75,0.0.0.0); 

H3 = add_ph("fire_door".9.W,0,1); 

H3Pl=add_pg(H3,0.0,l,l); 

H3P1V1 = add_vertex(H3P1.0.0.0.0); 

H3P1V2 = add_verlex(H3Pl ,1.75,0.0); 

H3P1V3 = add_vertex(H3Pl,1.75.35.6); 

H3P1V4 = add_vertex(H3Pl.0.0.35.6); 

H3P2 = add_pg(H3,82.9,0.I); 

H3P2V1 = add_vei1ex(H3P2.0.0.0.0); 

H3P2V2 = add_vertex(H3P2,1.75.0.0); 

H3P2V3 = add_vertex(H3P2.1.75.35.6); 

H3P2V4 = add_vertex(H3P2,0.0.35.6); 

add_edge(H3PlVl,H3P2Vl); /*link up vert edges of door*/ 

add~edge(H3PlV2,H3P2V2); 

add_edge(H3PlV3,H3P2V3). 

add_edge(H3PlV4.H3P2V4); 

add_ceiling(H3Pl.H3P2); 


add_instance(" 1 si_fire_doorl M 3 ,H3 .-5.5.1488.3.0.2,0.0.0.0.0.0); 
add_instance("lst_fire_door2M3.H3.-5,5.15.59.7.0.2.0.0.35.6.0.0); 


H4 = add_ph(’restroom_door". 13,W,0.1); 

H4P1 =add_pg(H4,0,ori,l); 

H4P1V1 = add_vertex(H4Pl .O.O.O.O); 

H4P1V2 = add_vertex(H4Pl. 1.75.0.0); 

H4P1V3 = add_vertex(H4Pl. 1.75,31.5); 

H4P1V4 = add_verlex(H4Pl .0.0.31.5); 

H4P2 = add j)g(H4,83.25,0.1); 

H4P2V1 = add_vertex{H4P2.O.O.O.O); 

H4P2V2 = add_vertex(H4P2,l .75,0.0); 

H4P2V3 = add_vertex(H4P2,1.75,31.5); 

H4P2V4 = add_vertex(H4P2.0.0.31.5); 
add_edge(H4Pl V1 ,H4P2V 1); 
add_edge(H4Pl V2,H4P2V2); 
add_edge(H4Pl V3 ,H4P2V3); 
add~edge(H4PlV4,H4P2V4); 

add_ceiling{H4Pl,H4P2); 

add_insUnce("door522R",8.H4,-5.3.146) .0.0.2.0.0,31.5.0.0); 
add_insUnce('door526R" ,8 .H4.-5.3.1785.9.0.2.0.0.31.5,0.0); 


H5 = add_ph("double_door". 11 ,W,0.1); 
H5PI=add_pg(H5.0.0.1.l); 

H5PIV1 = add_vettex(H5Pl.O.O.O.O); 
H5P1V2 = add”verlex(H.5Pl.1.75.0.0); 
H5P1V3 - Bdd_vei1ex(H5Pl, 1.75.29.6); 
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H5P1V4 = add_veilex(H5Pl.0.0,29.6): 

H5P2 = «dd_pg(H5,82.9,0,1); 

H5P2V1 = add_vertex(H.‘>P2,0.0,0.0); 

H5P2V2 = add\ertex(H5P2,1.75,0.0); 

H.';?3V3 = add_vertex(H5P2,1.7.S,29.6); 

H5P2V4 - add_vertex(H.SP2,0.0,29.6); 

add ^dge(H5PlVl,H5P2Vl); /‘link up verl edges of door*/ 

add_edge(H5PlV2,H.SP2V2): 

add_cdge(H5PlV3,H5P2V3); 

add_edge(H5PlV4,HSP2V4); 

add_ceiling(H.'>Pl ,H5P2); 

add insUnceCIdoor53r,8,H5,103.3,l937.4,0.2,l.75,29.6,0.0); 
add"inslanceC2door53r,8,H5,103.3,1878.0,0,2,1.7.‘i,0.0,0.0); 
add~inslance("ldoorS29-,8,H5,103.3,1744.2,0.2.1.7.6,29.6,0.0); 
add_inslanceC2door529",8,H.6,103.3,1684.8,0.2,1.7.6,0.0,00); 
add_instance(" ldoor527",8,H.6,103.3,1.622.1,0.2,1.7.6,29.6,0.0); 
add_in.stanceC2doorS27”,8,H.6,103.3,1462.7.0.2,1.75,0.0,0.0); 
add_in.sunceCldoor_ofriceM2.H.6.339.25.402.3,0.2,1.7.6,29.6.0.0); 
add_inslance(”2door_office". 12,H5,339.25,342.9,0.2,1.75,0.0.0.0); 


/* Notice that lights have no height */ 

H6 = add_phClight"..6.W.l.l); 

H6P1 =add_pg(H6.0.0,1,1); 

H6P1V1 = add_vertex(H6P1.0.0.0.0): 

H6P1V2 = add’vertex(H6Pl,45,.6.0.0); 

H6P1V3 = add”venex(H6PI.4.6.6,2l.2.6); 

H6P1V4 = add_vertex(H6Pl.0.0.21.25); 

add_instance(*lightl',6,H6.26.2.6.98..6.102.0.0.0.0.0.0.0); 
add jnstance(’light2".6,H6.26.25,362.7.6.102.0.0.0.0.0.0.0); 
add“instanceriight3".6.H6,26.25.651.0.102.0,0.0,0.0,0.0); 
add"instance('light4“,6.H6.26.2.6,915.2.6,102.0,0.0,0.0.0.0); 
add JnsianceriighL6'.6.H6.26.2.6.1251.5.102.0,0.0.0.0.0.0); 
add~instance("light6”,6.H6.26.2.6,1539.75.102.0.0.0.0.0.0.0); 
add_instance{"light7“,6.H6.26.26.1828.0.102.0.0.0.0.0.0.0); 
add_instanceClight8",6,H6.26.25.2140.2.6.102.0.0.0.0.0,0.0); 

/* Since all molding sizes are different, we need to add a separate 
polyhedron for each one. But we still need to add one instance 
of each so it will appear in the model*/ 

/* 37 different molding pieces */ 

H7 = add__ph('moldingl ■,8,W. 1,1); 

H7P1 = add_pg(H7.0.0,1.1); 

H7P1V1 = add_vei1ex(H7P1.0.0.0.0); 

H7P1V2 = add_vertex(H7Pl,0.2.0.0); 

H7PIV3 = add_venex(H7Pl .0.2.237.6); 

H7P1V4 = add_vertex(H7Pl.0.0.237.5); 

H7P2 = add_pg(H7,3.875.0.1); 

H7P2V1 = add_veitex(H7P2.0.0.0.0); 

H7P2V2 = add2vertex(H7P2.0.2.0.0); 

H7P2V3 = add_vertex(H7P2,0.2,237..6); 

H7P2V4 = add_vertex(H7P2.0.0,237.5); 
add_edge(H7PlVl,H7P2Vl); 
add_edge(H7PlV2.H7P2V2); 
add_edge(H7Pl V3 ,H7P2V3); 
add~edge(H7PlV4,H7P2V4); 
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add_ceiling(H7Pl,H7P2); 

add_tnslance("moldingl ".8.H7,0.0.0.0.0.0.0.0.0.0.0.0); 

H8 = add_ph('molding2",8,W,l.l); 
H8Pl=add_pg(H8.0.0.1,l); 

H8P1V1 = add_vertex(H8P1.0.0.0.0); 

H8P1V2 = add_vertex(H8P1.0.2.0.0); 

H8P1V3 = add_vertex(H8Pl,0.2.434.5); 

H8P1V4 = add_vertex(H8Pl,0.0,434.5); 

H8P2=add_pg(H8.3.875,0,1); 

H8P2V1 = add_vertex(H8P2,0.0,0.0); 

H8P2V2 = add_vertex(H8P2,0.2,0.0); 

H8P2V3 = add_vertex(H8P2.0.2,434.5); 

H8P2V4 = add_venex(H8P2,0.0,434.5); 

add_edge(H8Pl VI ,H8P2V 1); 

add_edge(H8PlV2,H8P2V2); 

add_edge(H8PIV3,H8P2V3); 

add_edge(H8PlV4,H8P2V4); 

add_ceiling(H8Pl.H8P2); 


add_instance("molding2",8,H8,0.0,277.2,0.0.0.0,0.0,0.0); 

H9=add_ph("molding3",8,W,l ,1); 
H9Pl=add_pg(H9,0,0.1,l); 

H9P1V1 = add_veilex(H9Pl.00,0.0); 

H9P1V2 = add_venex(H9PI .0.2.00); 

H9P1V3 * add_vertex(H9Pl,0.2,72.5); 

H9P1V4 = add~vertex{H9Pl,0.0,72.5); 

H9P2=add_pg(H9,3.875.0.1); 

H9P2VI = add_vertex(H9P2,0.0.0.0); 

H9P2V2 = add_vertex(H9P2.0.2.0.0); 

H9P2V3 = add~\enex(H9P2.0.2,72.5); 

H9P2V4 = add\eflex(H9P2.0.0.72.5): 
add_edge(H9Pl VI .H9P2V1); 
add_edge(H9PIV2,H9P2V2); 
add_edgc(H9P IV3 .H9P2V3); 
add_edge(H9PlV4.H9P2V4); 
add_ceiling(H9Pl ,H9P2); 

add_instance("molding3".8.H9,0.0.751.4.0.0,0.0,0.0.0.0); 

H 10=add_ph(”molding4".8,W. I. I); 

HI OP 1 = add_pg(H 10.0.0,1.1); 

HIOPIVI = add_vertex(H10P1.0.0.0.0); 

H10PIV2 = add_vertex(H10Pl,0.2.0.0); 

H10P1V3 = add_vertex(H10Pl.0.2.71.9); 

H10P1V4 = add_vertex(H10Pl,0,0.71.9); 

H10P2=add_pg(H 10.3.875.0,1); 

H10P2V1 = add_vertex(H10P2,0.0.0.0); 

H10P2V2 = add_vertex(H10P2,0.2.0.0); 

H10P2V3 = add_vertex(H10P2.0.2.71.9); 

H10P2V4 = add_vertex(H)0P2.0.0,7I.9); 
add_-dge(H 1 OP 1V1 ,H 10P2 V1); 
add_edge(H 1OPI V2.H 10P2 V2); 
add_edge(H 1 OPI V3,H 10P2V3); 
add_edge(H I OPI V4,H 10P2V4); 
add_ceiling(H10Pl ,HI0P2); 

addJnsUnce(’moIding4",8,H 10.0.0.863.6,0.0.0.0.0.0.0.0); 

HI 1 =add_ph(’molding5",8.W.1,1); 



HnPl=addjg(Hll,0.0,l.l): 

HIIPIVI = ■dd_venex(HllP1.0.0.0.0); 

H1IP1V2 = «dd~vencx(HUP1.0.2.0.0); 

HllPlVa = add_vertex(HllPl,0.2.72.5); 

H11P1V4 = add“vertex(HllP1.0.0,72.5); 

H11P2=add_pgftl 11.3.875,0,1); 

H11P2VI = add_vertex(HIlP2,0.0.0.0); 

HUP2V2 = add~vertex(HllP2,0.2.0.0); 

H11P2V3 = add~venex(HllP2,0.2,72.5); 

H11P2V4 = add~vertex(HlIP2.0.0.72.5); 
add_edge(H 11P1V1 ,H 11P2V1), 
add~edge(H 11 PI V2,H 11P2V2): 
add~edge(H 11 PI V3,H 11P2V3); 
add_edge(H 11 PI V4,H 11P2V4); 
add~ceiling(HllPl.HllP2); 

add_inslanceCmolding5",8.H 11.0.0.975.2.0.0.0.0,0.0.0.0); 

H12 = add_ph("molding6',8,W,l.l); 

H12P1 =add_pg(H 12,0.0.1,1); 

H12P1V1 = add_vertex(H12Pl,0.0,0.0); 

H12P1V2 = add_vertex(H12P1.0.2.0.0); 

H12P1V3 = add_vertex(H12Pi ,0.2,72.3); 

H12P1V4 = add_vertex(H12Pl,0.0,72.3); 

H12P2 = add_pg(H 12,3.875,0,1); 

H12P2V1 = add_vertex(H12P2.0.0,0.0); 

H12P2V2 = add~vertcx(H12P2.0.2.0.0); 

H12P2V3 = add_venex(H12P2.0.2.72.3); 

H12P2V4 = add_vertex(H12P2,0.0.72.3); 
add_edge(H 12P1V1 ,H 12P2V1); 
add_edge(H 12P1 V2.H 12P2V2); 
add”edge(H12PlV3,H12P2V3); 
add_edge(H 12P1V4. H12P2 V4); 
add^eeiling(H12Pl.H12P2); 

add_inslance('molding6".8,HI2,0,0,l087,4,0.0,0.0.0.0.0.0); 

H13 = add_ph("molding7",8.W.l,l); 
H13Pl=add_pg(H13,0.0,l.l); 

H13P1V1 = add_verlex(H13Pl,0.0,0.0); 

H13P1V2 = add~vertex(HI3P1.0.2.0.0); 

H13P1V3 = add_vertex(Hl3Pl,0,2.72.0); 

HI3P1V4 = add_vertex(H 13P1.0,0.72.0); 

H13P2 = add_pg(H13.3.875.0.1); 

H13P2V1 = add_vertex(H13P2.0.0.0.0); 

HI3P2V2 = add_venex(HI3P2.0,2.0.0); 

H13P2V3 = add_vertex(H13P2,0.2.72.0); 

H13P2V4 = add~vertex(H13P2,0.0,72,0); 
add_edgem 13P1V1.H13P2V)); 
add_edge(H 13P1 V2.H 13P2V2); 
add_edge(H13PlV3.H13P2V3); 
add_edge(H13PlV4,H13P2V4); 
add_ceiling(H13Pl,H13P2); 

add_mstanceCmolding7’,8.H13,0.0.1199.4,0.0,0.0,0.0.0.0); 

H14=add_ph("molding8",8.W,l,l); 

H14Pl-add_pg(H14,0.0.1,1); 

H14PIV1 - add_vertex(HI4PI,0.0.0.0); 

H14P1V2 = add_vertex(H14Pl,0.2.0.0); 

H14P1V3 - add~vef1ex(H14PI .0.2.116 -5); 

HI4PIV4 = add~ver1ex(H14PJ.0.0.n6..5); 
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H14P2=add_pg{H14,3.875,0.1); 

H14P2V1 = add_veftex(H14P2.0.0.0.0); 

H14P2V2 = add_veilex(H14P2.0.2.0.0); 

H14P2V3 = add_veitex(H14P2.0.2.ll6.5); 

H14P2V4 = add_venex(H14P2.0.0.116.5); 
add_edge{H 14P1V1 .H14P2V1); 
add_edge(H 14P1 V2.H 14P2 V2); 
add_edge(H14PlV3.H14P2V3); 
add~edge(H 14P1 V4,H 14P2V4); 
add_ceiling(H 14P1 .H14P2); 

add_instance(''molding8',8,H 14.0.0,1311 .l.O.O.O.O.O.O.O.O); 

H15 = add_phrmolding9-,8,W,l,l); 
H15Pl=add_pg(H15.0.0.1.1); 

H15P1V1 = add_vertex(Hl5Pl,0.0.0.0); 

H15P1V2 = add_ver1ex(Hl5P1.0.2.0.0); 

H15P1V3 = add_vertex(H15Pl,0.2.22.7); 

H15P1V4 = add_vertex{H15Pl.0.0.22.7); 
H15P2=add_pg(H15.3.875.0.1); 

H15P2V1 = add_ver1ex(H15P2.0.0.0.0); 

H15P2V2 = add_vertex(H15P2.0.2.0.0); 

H15P2V3 = add_verlex(H15P2.0.2.22.7); 

H15P2V4 = add_vertex(H15P2.0.0.22.7); 

add_edge(H15PlVl,H15P2VI); 

add_edge(H15PlV2.H15P2V2); 

add_edge(H15PlV3.H15P2V3); 

add_edge(H 15P1 V4,H 15P2 V4); 

add2ceiling(H15Pl.H15P2); 

add_instance("molding9".8.H15.0.0.1463.3.0.0.0.0.0.0.0.0); 

H16 = add_phCmolding 10" .9, W, 1.1); 
H16Pl=add_pg(hl6.0.0.1.1); 

H16P1V1 = add_vertex(H16P1.0.0.0.0); 

H16P1V2 = add~venex(H16P1.0.2.0.0); 

H16P1V3 = add~vertex(H16Pl.0.2.19.3); 

H16P1V4 = add~vcrtex(H16P1.0.0.19.3); 

H16P2=add_pg(H 16.3.875.0.1); 

H16P2V1 = add_venex(H16P2.0.0.0.0); 

H16P2V2 = add_vertex(H16P2.0.2.0.0); 

H16P2V3 = add_vertex(H16P2.0.2,19.3); 

H16P2V4 = add_vertex(H16P2.0.0.19.3); 
add_edge(H 16P1V1, H16P2 V1); 
add_edge(H 16P1 V2.H 16P2V2); 
add_edge(H 16P1 V3,H 16P2V3); 
add_edge(H16PlV4,H16P2V4); 
add”ceiling(H 16P1 .H16P2); 

add_instance("inoldinglO",9.HI 6,0.0.1562.0.0.0.0.0.0.0,0.0); 

H17=add_ph(’moldingll-.9.W.l,l); 

H17P1 = add_pg(H 17,0.0.1.1); 

H17P1V1 = add_vertex(H17PI.0.0.0.0); 

H17P1V2 = add_vertex{H17Pl,0.2.0.0); 

H17P1V3 = add_vertex(H17Pl.0.2.31.4); 

H17P1V4 = add_vertex(HI7P1.0.0,31.4); 

H17P2=add j)g(H 17,3.875.0,1); 

HI7P2V1 = add_vertex(H17P2,0.0.0.0); 

H17P2V2 = add_vei1ex(H17P2,0.2.0.0); 

H17P2V3 = add_veitex(H17P2.0.2.31.4); 

H17P2V4 = add_veilex(H17P2.0.0,31.4); 
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idd_edge{H 17PJV1.H17P2V1); 

•ddIedge(H 17P1 V2,H 17P2V2); 
add_edge(H 17P1 V3,H 17P2V3); 
add~edge(H 17P1 V4.H 17P2V4); 
add_ceiling(H 17P1 .H17P2); 

add_instance('nioldingl 1",9,H 17.0.0,1619.0,0.0.0.0,0,0,0.0); 

H18=add_phr molding 12" .9, W, 1,1); 

H18P1 = add_pg(H 18,0.0,1,1); 

H18P1V1 = add_venex(H18Pl,0.0.0.0): 

H18P1V2 = add_veffex(H18P1.0.2,0.0); 

H18P1V3 = add_vertex(H18Pl,0.2,68.0); 

H18P1V4 = add”vertex(H18Pl ,0.0,68.0); 

H18P2 = add_pg(H18,3.875.0,l); 

H18P2V1 = add_veitex(H18P2,0.0,0.0); 

H18P2V2 = add_ver1ex(H18P2.0.2,0.0); 

H18P2V3 = add~verlex(H18P2,0.2.68.0); 

H18P2V4 = add~vertex(HI8P2,0.0,68.0); 
addedgeCH 18P1V1 .H18P2V1); 
add_edgeCH 18P1 V2,H 18P2V2); 
add_edge(H 18P1V3 ,H 18P2V3); 
add_edge(H 18P1 V4.H 18P2V4); 
add~ceiling(H 18P1 ,H 18P2): 

add_inslanceCmoldingl2",9, HI 8.0.0.1684.5,0,0,0.0.0.0,0.0); 

H19 = add_ph(*molding 13' .9,W, 1,1); 

H19P1 =add_pg(H19,0.0.1.1); 

H19P1V1 = add_vettex(H19P1.0.0.0.0); 

H19P1V2 = add\ertex(H19Pl,0,2.0.0); 

H19P1V3 = add\erlex(H19Pl,0.2.46.2); 

H19P1V4 « add\ertex(HI9Pl,0.0.46.2); 
H19P2=add_pgaJ19.3.875.0.1): 

H19P2V1 = add_vert«x(H19P2.0.0.0.0); 

H19P2V2 = add\ertex(H19P2.0.2.0.0); 

H19P2V3 = add”vertex(H19P2.0.2,46.2); 

H19P2V4 = add_verlex(H19P2.0.0.46.2); 
add_edge(H 19P1V1. H19P2V1); 
add~edge{H19PlV2,H19P2V2); 
add~edge(H 19P1V3 .H19P2V3); 
add~edge(H19PlV4.H19P2V4); 
add~ceiling(H19Pl,H19P2); 

add_inslance(”moldingl3",9.H19,0.0.1788.2,0.0.0.0.0.0.0.0); 

H20=add_ph(”moldingl4’,9,W,l,l): 

H20P1 =add_pg(H20,0.0.1.1); 

H20P1V1 = add_vertex(H20Pl.00,0.0); 

H20P1V2 = add_veftex(H20Pl,0.2,0.0); 

H20P1V3 = add_vertex(H20Pl .0.2.43.0): 

H20P1V4 = add2vertex(H20Pl .0.0.43.0); 

H20P2=add_pgai20,3.875,0,1); 

H20P2V1 = add_vertex(H20P2,0.0.0.0); 

H20P2V2 = add”veitex(H20P2,0.2.0.0); 

H20P2V3 - add~vertex(H20P2,0.2.43.0): 

H20P2V4 = add_vertex(H20P2.0.0.43.0); 
add_edge(H20Pl VI ,H20P2V 1). 
add~edge(H20Pl V2.H20P2V2); 
add~edge(H20Pl V3 .H20P2 V3); 
add~edgefH20PlV4,H20P2V4); 
add2ceiling(H20Pl ,H20P2); 
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»dd_insUnce(“moldingl4".9.H20.0.0.1874.1.0.0,0.0,0.0.00); 

H21 =»dd_ph{"moldingl.S".9,W. 1,1); 

H21P1 - add_pg(H21.0.0.1.1); 

H21P1V1 = add_vetlex(H21P1.0.0,0.0); 

H21P1V2 = add_venex(H21Pl,0.2.0.0); 

H21P1V3 = add_vertex(H21Pl,0.2.71.6); 

H21P1V4 = add_vertex(H21Pl.0.0.71.6); 

H21P2=add_pg(H21,3.875.0.1); 

H21P2V1 = add_vertex(H21P2,0.0.0.0); 

H21P2V2 = add_vertex(H21P2.0.2.0.0); 

H21P2V3 = add_vertex(H21P2.0.2.71.6); 

H21P2V4 = add_vertex(H21P2.0.0,71.6); 
add_edge(H21 PI V1 .H21P2V1); 
add_edge(H21 PI V2.H21P2V2); 
add_edge(H21 PI V3 .H21P2 V3); 
add~edge(H21 PI V4.H21P2V4); 
add_ceiling(H21 PI .H21P2); 

add_msUnceCmoldingl5".9,H21.0.0.19.56.8,0.0.0.0.0 0.0.0); 

H22=add _phCmoldingl6",9.W,l.l); 

H22P1 =add_pg(H22.0.0.1.1); 

H22P1V1 = add_veflex(H22P1.0.0.0.0); 

H22P1V2 = add_vertex(H22P1.0.2.0.0); 

H22P1V3 = add_veitex(H22Pl.0.2.125.0); 

H22P1V4 = add"vertex(H22P1.0.0.125.0); 

H22P2 = aud_pg(H22,3.875,0.1); 

H22P2V1 = add_vertex(H22P2,0.0.0.0); 

H22P2V2 = add~vertex(H22P2.0.2.0.0); 

H22P2V3 = add~vertex(H22P2,0.2.125.0); 

H22P2V4 = add"veitex(H22P2.0.0.125.0); 
add_edge( H22P1V1 ,H22P2V 1); 
add'edge H22P1V2.H22P2V2); 
add“edgr'H22PlV3.H22P2V3); 
add'edgc' H22P1 V4,H22P2V4); 
add_ceiP >g(H22Pl ,H22P2); 

add_instar. iCmoldingl 6*.9.H22.0.0,2068.1,0.0.0.0.0.0.0.0); 

H23=ad' !_ph(’nK)lding9",8.W. 1.1): 

H23P1 = :.dd_pg(H23.0.0.1.1); 

H23P1VI = add_venex(H23P1.0,0,0.0); 

H23P1V; = add_vertex(H23Pl,0.2.0.0); 

H23P1V = add_vertex(H23Pl.0.2,19.0); 

H23P1V4 = add”verlex(H23P1.0.0.19.0); 

H23P2 = add_pg(H23,3.875,0,1); 

H23P2\ . = add_veriex(H23P2.0.0.0.0); 

H23P2V = idd_venex(H23P2.0.2,0.0); 

H23P2V: = add"vertex(H23P2,0.2,I9.0); 

H23P2V<; = add_vertex(H23P2.0.0.19.0); 
add_edge. H23P1V1 ,H23P2V 1); 
add edgo(H23PlV2,H23P2V2); 
add_edge; H23P1 V3,H23P2V3); 
add”edge(H23PlV4,H23P2V4); 
add_ceiling(H23Pl ,H23P2); 

add_insUnceCmoldingl6',9,H23,0.0,2232.8,0.0,0.0,0.0,0.0); 

H24«add_ph(’molding 17",9.W. 1.1); 

H24P1 -addj>g(H24,0.0,l ,1); 

H24PIV1 = add_venex(H24Pl ,0.0,00); 
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H24P1V2 = idd_vertex(H24P1.0.2.0.0); 

H24P1V3 = »dd”vertex(H24Pl,0.2.61.7); 

H24P1V4 = add\erlex'H24Pl.0.0.61.7); 

H24P2 = add_pg(H24,3.875.0.1); 

H24P2V1 = add_vertex(H24P2.0.0.0.0); 

H24P2V2 = add_veilex(H24P2.0.2.0.0); 

H24P2V3 = add_vertex(H24P2.0.2.61.7); 

H24P2V4 = add~vertex(H24P2.0.0.61.7); 
add_edge(H24Pl V1 ,H24P2V 1); 
add_edge(H24PlV2,H24P2V2); 
add~edge(H24Pl V3 ,H24P2 V3): 
add~edge(H24PlV4,H24P2V4); 
add“ceiling(H24Pl ,H24P2); 

add_instance("moldmgl7".9,H24.0.0.2289.5.0.0.0.0.0.0.0.0); 

H25 = addjjhCmoldingl 8-.9.W. 1.1). 

H25P1 =add_j)g(H25,0.0,l,l); 

H25P1V1 = add_veftexCH25P1.0.0.0.0); 

H25P1V2 = add_vertex(H25P1.0.0,l77.3); 

H25P1V3 = add_vettex(H25Pl.-0.2.177.3); 

H25P1V4 = add_vertex(H25Pl.-0.2.0.0); 

H25P2 = add_pg(H25.3.875.0.1); 

H25P2VI = add_veftex(H25P2.0.0.0.0); 

H25P2V2 = add”vertex(H25P2.0.0.177.3); 

H25P2V3 = add\eriex(H25P2.-0.2.177.3); 

H25P2V4 = add_venex(H25P2.-0.2.0.0); 

add_edge(H25PlVl.H25P2Vl); 

add”«dge(H25PlV2.H25P2V2); 

add"edge(H25PlV3,H25P2V3); 

add~edge(H25PlV4,H25P2V4); 

add2ceiling(H25Pl.H25P2): 

add_ins»a nce("inoldingl 8".9.H25.98.0.2173.9.0.0.0.0.0.0.0.0); 

H26=add_ph(’moldingl9'.9.W, 1.1); 

H26P1 =add_pg(H26.0.0.1.1); 

H26P1V1 = add_vertex(H26PI.0.0.0.0); 

H26P1V2 = add_vertex(H26Pl,0.0.194.5); 

H26P1V3 = add~vert«x(H26Pl.-0.2.194.5); 

H26P1V4 = add~veriex(H26Pl.-0.2.0.0); 

H26P2 = add _pg(H26,3.875.0,1); 

H26P2V1 = add_vef1ex(H26P2.0.0.0.0); 

H26P2V2 = add”vertex(H26P2.0.0,194.5); 

H26P2V3 = add_vertex(H26P2,-0.2.194.5); 

H26P2V4 = add_vertex(H26P2.-0.2.0.0); 
add_edge(H26Pl V1 ,H26P2V 1); 
add_edge(H26PlV2.H26P2V2); 
add_edge(H26PlV3.H26P2V3); 
add_edge(H26PlV4,H26P2V4); 
add_ceiIing(H26Pl ,H26P2); 

add_inaUnce("inolding 19",9,H26,98.0,1939.7,0.0,0.0,0.0,0.0); 


H27=add _phCmolding20-.9. W, 1.1); 

H27PI = add_pg(H27.0.0,1.1); 

H27P1V1 - add_vertex(H27P1.0.0,0.0); 
H27PIV2 - add_vertex(H27Pl,0.0.129.2); 
H27P1V3 = add_vertex(H27Pl.-0.2.129.2); 
H27PIV4 » add~vet1ex(H27Pl.-0.2.0.0); 
H27P2 - add_pgai27.3.875.0,1); 
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H27P2V1 = add_veitex(H27P2.0.0.0.0); 

H27P2V2 = »dd”vetiex(H27P2.0,0.129.2); 

H27P2V3 = add”vertex(H27P2.-0.2.129.2); 

H27P2V4 = add_veitcx(H27P2.-0.2.0.0); 
add_edge(H27Pl V1 ,H27P2V 1); 
add_edge(H27PlV2.H27P2V2); 
add_edge(H27PlV3.H27P2V3); 
add_edge(H27PlV4,H27P2V4); 
add_ceiling(H27PI ,H27P2); 

add_insianceCmolding20",9,H27.98.0.l746.5,0.0.0.0.0.0,0.0); 

H28 = add_phC moldinga 1" ,9. W. 1,1); 

H28P1 = add_pg(H28.0.0.1.1); 

H28P1V1 = add_vertex(H28Pl,0.0,0.0); 

H28P1V2 = add_vertex(H28P1.0.0.158.1); 

H28P1V3 = add~vertex(H28Pl,-0.2.1.18.1); 

H28P1V4 = add_vertex(H28Pl.-0.2.0.0); 
H28P2=add_pg(H28,3.875,0,l); 

H28P2V1 = add_vertex(H28P2.0.0,0.0); 

H28P2V2 = add~vertex(H28P2.0.0.1.<i8.1); 

H28P2V3 = add_vertex(H28P2.-0.2.1.18.1); 

H28P2V4 = add_vct1ex(H28P2.-0.2.0.0); 

add_edge(H28PlVl.H2aP2Vl); 

add_edge(H28PlV2.H28P2V2); 

add_edge(H28PlV3,H28P2V3); 

add_edge(H28PlV4,H28P2V4); 

add_ceiling(H28Pl .H28P2); 

add_insUnce("molding21'.9.3128,98.0.1124.4.0.0.0.0.0.0.0.0); 

H29=add_ph("niolding22'.9. W. 1.1); 

H29P1 = add j.g(H29.0.0,1.1); 

H29P1V1 = add_veilex(H29Pl,0.0.0.0); 

H29P1V2 = add_vertex(H29Pl.0.0.111.7); 

H29P1V3 = add_vettex(H29Pl.-0.2.111.7); 

H29P1V4 = add”vertex(H29PI.-0.2.0.0); 

H29P2=add_pg(H29.3.871.0.1); 

H29P2V1 = add_vertex(H29P2.0.0.0.0); 

H29P2V2 = add_vertex(H29P2.0.0.111.7); 

H29P2V3 = add_vertex(H29P2,-0.2.111.7); 

H29P2V4 = add2vertex(H29P2.-0.2.0.0); 
add_edge(H29Pl V1 .H29P2V1); 
add_edge(H29PlV2.H29P2V2); 
add_edge(H29PlV3.H29P2V3); 
add_edge(H29Pl V4.H29P2V4); 
add_ceiling(H29Pl ,H29P2); 

add_insunce("molding22'.9,H29,98.0,1344.7,0.0,0.0.0.0,0.0); 

H30=add _ph(*molding23' .9. W, 1, |); 

H30P1 =addj)g(H30,0.0.l,l); 

H30P1V1 - add_vertex(H30Pl,0.0.0.0); 

H30P1V2 - add_veilex(H30Pl ,0.0.184.2); 

H30P1V3 « add_vertex(H30Pl.-0.2,184.2); 

H30P1V4 - add_veriex(H30Pl.-0.2.0.0); 

H30P2 - add_pg(T130,3.875.0.1); 

H30P2VI - add_vertex(H30P2.0.0.0.0); 

H30P2V2 - add3vertex(H30P2.0.0.184.2); 

H30P2V3 - add_vertex(H30P2.-0.2.184.2); 

H30P2V4 - add_vertex(H30P2.-0.2.0.0); 
add_edge(H30Pl VI .H30P2V1); 
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•dd edge(H30PlV2.H30P2V2); 
add edge(H30PlV3.H30P2V3); 
add~edge(H30PlV4,H30P2V4); 
add~ceiling(H30Pl ,H30P2); 

add instance(“iiiolding24",9,H30,98.0,1120.8,0.0,0.0,0.0.0.0); 
H31 = add_phr molding25" ,9, W, I, I); 

H31 PI =add_pg(H31.0.0,1,1); 

H31P1V1 = add_vertex(H31Pl,0.0,0.0); 

H31P1V2 = add_v«ttex(H31P1.0.0.283.0); 

H31P1V3 = add~v«nex(H31 PI.-0.2.283.0); 

H31PIV4 = add_v«rtex(H31Pl.-0.2.0.0); 

H31P2=add j)g(H31,3.875.0.1); 

H3IP2V1 = add_v«ftex(H3IP2,0.0,0.0); 

H31P2V2 • add_v<rtex(H31P2,0.0.283.0); 

H31P2V3 = add_v«rtex(H31P2.-0.2.283.0); 

H31P2V4 = add_vertex(H31P2,-0.2.0.0); 
add edge(H31PlVl,H31P2Vl); 
add~edgtf (H31 PI V2, H31P2 V2); 
add_edge(H31 PI V3.H31P2V3); 
add_edge(H31P 1 V4. H31P2 V4); 
add_ceiling(H31Pl.H31P2); 

add_inslanceCmolding25-.9.H31,98.0.798.1.0.0.0.0.0.0.0.0); 

H32 = add_phCmolding26" .9. W. 1.1); 
H32Pl=addj)g(H32.0.0.1.1); 

H32P1V1 = add_vertex(H32P1.0.0.0.0); 

H32P1V2 = add”vertex(H32Pl,0.0,191.9); 

H32P1V3 = add\ertex(H32Pl,-0.2,191.9); 

H32P1V4 = add”v«ilex(H32Pl.-0.2.0.0): 

H32P2 = addj)gOH32.3.87S.O,l); 

H32P2V1 = add_vertex(H32P2.0.0.0.0); 

H32P2V2 = add”v«ttex(H32P2,0.0,191.9); 

H32P2V3 = add~vertex(H32P2,-0.2.191.9); 

H32P2V4 = add"vertex(H32P2.-0.2.0.0); 

add edge(H32PIVI.H32P2Vl); 

add"edge(H32PlV2.H32P2V2): 

add~edgtf(H32PIV3.H32P2V3); 

add edge(H32PlV4.H32P2V4); 

add”ceiling(H32Pl,H32P2); 

add_inslanceCmolding26-.9.H32.98.0.566.5.0.0.0.0.0.0.0.0); 

H33 =add_ph("moIding27".9,W, 1,1); 
H33Pl=add_pg(H33,0.0,l,l); 

H33PIV1 « add_vettex(H33Pl ,0 0,0.0); 

H33PIV2 = add”vertex(H33Pl.0.0.112.9); 

H33P1V3 = add_vertex(H33Pl.-0.2.112.9); 

H33P1V4 = add_veilex(H33Pl.-0.2.0.0). 

H33P2=add_pg^33.3.875.0,1); 

H33P2VI = 8dd_verlex(H33P2,0.0.0.0); 

H33P2V2 = add”vertex(H33P2.0.0,112.9): 

H33P2V3 = add”vertex(H33P2,-0.2,ll2.9); 

H33P2V4 = add~vertex(H33P2,-0.2,0.0); 
add edge(H33PlVl,H33P2Vl); 
add”edge(H33Pl V2.H33P2V2); 
add~edge(H33PlV3,H33P2V3); 
add~edge(H33PlV4,H33P2V4); 
add“e«iling(H33PI .H33P2): 






add_insuince("molding27",9.H33.98,0.413.9.0.0,0.0.0.0,0,0); 

H34=add_ph("molding28" ,9. W. 1.1); 

H34P1 =add_pg(H34.0,0.1.1); 

H34P1V1 = add_verlex(H34Pl,00,0.0); 

H34P1V2 = add_veriex(H34P1.0,0.-0.2); 

H34P1V3 = add_vertex(H34Pl.l.‘i7.9.-0.2); 

H34P1V4 = add_venex(H34Pl,157.9.0.0); 

H34P2 = add_pg(H34.3.875.0.1); 

H34P2V1 = add_veflex(H34P2,0.0.0.0); 

H34P2V2 = add_vertex(H34P2.0.0,-0.2); 

H34P2V3 = add~vertex(H34P2,157.9,-0.2); 

H34P2V4 = add_vertex(H34P2.157.9.0.0); 
add_edge(H34P 1V1 .H34P2V1); 
add”edge(H34Pl V2,H34P2V2); 
add_edge(H34PlV3,H34P2V3); 
add_edge(H34Pl V4,H34P2V4); 
add_ceiling(H34Pl ,H34P2); 

add_inslanceCmolding28'.9,H34.98.0.4I3.9.0.0.0.0.0.0.0.0); 

H35 = add_ph("inolding29".9,W. 1.1); 

H35P1 =add_pg(H35.0.0.1.1); 

H35P1V1 = add_vertex(H35P1.0.0.0.0); 

H35P1V2 = add_vertex(H35Pl,0.0,-0.2); 

H35P1V3 = add_vertex(H35Pl,41.6,-0.2); 

H35P1V4 = add_vertex(H35Pl,41.6.0.0); 

H35P2 = add_pg(H35.3.875,0.1); 

H35P2V1 = add_vertex(H35P2,0.0.0.0); 

H35P2V2 = add”v«rtex(H35P2.0.0.-0.2); 

H35P2V3 = add\ertex(H35P2.41.6,-0.2); 

H35P2V4 = add"vertex(H35P2.41.6.0.0); 
add_«dge(H35 P1VI .H35P2VI), 
add edg<(H35PIV2.H35P2V2); 
add”edge(H35 PI V3. H35P2 V3); 
add_edge{H35PlV4.H35P2V4); 
add”ceiling(H35Pl .H35P2); 

add_instanceCmolding29".9.H35.295,9,413.9.0.0.0.0.0.0.0.0); 

H36 = addj;)h("molding30",9.W. 1,1); 

H36P1 =add_pg(H36.0.0,1,1); 

H36P1V1 = add_vertex(H36P1.0.0.0.0); 

H36P1V2 = add_vertex(H36Pl.-0.2.0.0); 

H36P1V3 = add_vertex(H36Pl,-0.2.9.3); 

H36P1V4 = add~vertex(H36P1.0.0.9.3); 

H36P2=add_pg(H36.3.875.0.1); 

H36P2V1 = add_vertex(H36P2,0.0.0.0); 

H36P2V2 = add_vertex(H36P2.-0.2,0.0); 

H36P2V3 = add”vertex(H36P2,-0.2.9.3); 

H36P2V4 = add2vetlex(H36P2.0.0,9,3); 
add_edge(H36Pl V1 ,H36P2V 1); 
add_edge(H36PlV2,H36P2V2); 
add_edge(H36PIV3,H36P2V3); 
add_edge(H36Pl V4.H36P2V4); 
add”ceiling(H36Pl ,H36P2); 

add_insUnce('molding30'.9,H36,337.5,404.6,0.0.0.0.0.0,0.0); 

H37=add_ph('molding31 ".9.W. 1,1); 

H37PI =idd j)g(H37,0.0.1.1); 

H37P1V1 = add_verlex(H37Pl,0.0,00); 
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H37P1V2 = add_vertex(H37Pl,-0.2.0.0); 

H37P1V3 = add~vetlex(H37Pl.-0.2.28.4); 

H37PIV4 = add_vertex(H37Pl.0.0,28.4); 

H37P2 = add j>g(H37,3.875.0.1); 

H37P2V1 = add_vertex(H37P2.0.0.0.0); 

H37P2V2 = add~vertex(H37P2,-0.2.0.0); 

H37P2V3 = add_vertex(H37P2,-0.2,28.4); 

H37P2V4 = add_vertex(H37P2,0.0.28.4); 
add_edge(H37Pl VI ,H37P2V 1); 
add_edge(H37PlV2,H37P2V2); 
add_edge(H37PIV3,H37P2V3); 
add_edge(H37PlV4.H37P2V4); 
add~ceilingCH37Pl .H37P2); 

add_inslance("molding31 ",9,H37,337.5,312.2,0.0.0.0.0.0,0.0); 

H38 = add_ph("molding32",9,W,I,l); 

H38P1 = add_pg(H38.0.0,1.1); 

H38P1V1 = add_venex{H38Pl,0.0,0.0); 

H38P1V2 = add_vertex(H38Pl,-0.2.0.0); 

H38P1V3 = add_venex(H38Pl.-0.2.5.1); 

H38P1V4 = add_venex(H38Pl .0.0.5.1); 
H38P2=add_pg(H38,3.875.0,1); 

H38P2V1 = add_vertex(H38P2,0.0,0.0); 

H38P2V2 = add_vertex(H38P2.-0.2.0.0); 

H38P2V3 = add_venex(H38P2.-0.2,5.1); 

H38P2V4 = add~venex(H38P2,0.0,5.1); 

add_edge(H38Pl VI ,H38P2V 1); 

add~edge(H38PlV2,H38P2V2); 

add~edge(H38PlV3.H38P2V3); 

add“edge(H38PlV4,H38P2V4); 

add"eeiling(H38Pl.H38P2); 

add JnsUnce('molding32'.9,H38,337.5,267.4.0.0,0.0.0.0.0.0); 

H39 = add_ph('molding33 ",9, W, 1,1); 

H39P1 =add_pg(H39,0.0,1,1); 

H39P1V1 = add_vertex(H39Pl,0.0,0.0); 

H39P1V2 = add”vertex(H39Pl ,30.6.0.0); 

H39P1V3 = add_vertex(H39Pl,30.6,0.2); 

H39P1V4 = add_vertex(H39Pl,0.0,0.2); 
H39P2=add_pg(H39.3.875,0.1); 

H39P2V1 = add_vertcx(H39P2.0.0.0.0); 

H39P2V2 = add_vertex(H39P2,30.6,0.0); 

H39P2V3 * add_vertex(H39P2,30.6.0.2); 

H39P2V4 = add_venex(H39P2.0.0.0.2); 
add edge(H39PlVl,H39P2Vl); 
add"edge(H39Pl V2,H39P2V2); 
add_edge(H39PlV3,H39P2V3); 
add%dge(H39PlV4,H39P2V4); 
add_eeiling(H39Pl ,H39P2); 

add_in»tance(“molding33",9,H39,306.9,267.4,0.0,0.0,0.0,0.0); 

H40-addjphrmolding34',9,W, 1,1); 

H40P1 = add_pg(H40,0.0,1,1); 

H40P1V1 » add_vertex(H40Pl,0.0.0.0); 

H40P1V2 « add”veitex(H40Pl ,56.7,0.0); 

H40P1V3 = add“vertex(H40Pl ,56.7.0.2); 

H40P1V4 * add_veftex(H40P1.0.0.0.2); 

H40P2 - add_pg(H40,3.875.0.1); 

H40P2V1 = add_vertex(H40P2,0.0,0.0); 
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H40P2V2 = add_vertex(H40P2,56.7.0.0); 

H40P2V3 = add_vertex(H40P2.56.7.0.2); 

H40P2V4 = add~vertcx(H40P2,0.0.0.2); 
add_edge(H40Pl V1 ,H40P2V 1); 
add_edge(H40PlV2,H40P2V2); 
add_edge(H40P 1V3 .H40P2 V3); 
add_edge(H40Pl V4,H40P2V4); 
add_ceiling(H40Pl ,H40P2); 

add_inslanceCinolding34*.9.H40.192.2.267.4,0.0.0.0.0.0.0.0); 

H41 =add_ph("molding3.6",9.W,l ,1); 

H41 PI = add_pg(H41,0.0,1,1); 

H41P1V1 = add_vertex(H41Pl,0.0.0.0); 

H41P1V2 = add_vertex(H41P1.36.2,0.0); 

H41P1V3 = add_vertex(H4IPl,36.2.0.2): 

H41P1V4 = add_vertex(H41P1.0.0.0.2): 
H41P2=add_pg{H41,3.875.0,1): 

H41P2V1 = add_vertex(H41P2,0.0.0.0): 

H41P2V2 = add_vertex(H41P2.36.2.0.0); 

H41P2V3 = add_vertex(H41P2,36.2.0.2); 

H41P2V4 = add_vertex(H41P2.0.0.0.2); 
add_edge(H41 PI V1 .H41P2V1); 
add_edge(H41 PI V2.H41P2V2); 
add"edge(H41 PI V3 .H41P2 V3); 
add^edge(H41 PI V4,H41P2V4); 
add”ceiling(H41 PI .H41P2); 

addjnstance("molding35".9.H41.98.0.267.4.0.0,0.0.0.0.0.0); 

H42 = add_ph("molding36'.9.W,l, 1); 

H42PI = add_pg(H42,0.0,1.1): 

H42P1V1 = add_verlex(H42P1.0.0.0.0): 

H42P1V2 = add_vertex(H42Pl,0.0.-0.2); 

H42P1V3 = add_vertex(H42Pl,165.4,-0.2); 

H42P1V4 = add~vertex(H42Pl. 165.4,0.0); 

H42P2 = add_pg(H42.3.875,0.1); 

H42P2V1 = add_vei1ex(H42P2.0.0.0.0); 

H42P2V2 = add_vertex(H42P2.0.0.-0.2); 

H42P2V3 = add_vei1ex(H42P2.165.4,-0.2); 

H42P2V4 = add~vertex(H42P2.165.4.0.0); 
add_edge(H42Pl V1 .H42P2V1); 
add”edge(H42Pl V2.H42P2V2); 
add_edge(H42PI V3 ,H42P2V3); 
addIedge{H42PlV4,H42P2V4); 
add”ceiling(H42Pl .H42P2); 

add_instanceCinolding36".9,H42,98.0,102.0,0.0,0,0,0.0,0.0); 

H43 = add_ph("molding37',9.W, 1,1); 

H43PI =add_pg(H43,0.0.1,1); 

H43P1V1 = add_vertex(H43P1.0.0,0.0); 

H43P1V2 = add_vertex(H43Pl,-0.2.0.0): 

H43P1V3 = add”vertex(H43Pl.-0.2.62.3); 

H43P1V4 - add_veitex(H43Pl ,0.0,62.3); 

H43 P2 = add jjg(H43.3.875.0,1); 

H43P2V1 = add_vertex(H43P2,0.0.0.0), 

H43P2V2 = add"vertex(H43P2,-0.2.0.0); 

H43P2V3 = add_vertex(H43P2.-0.2.62.3); 

H43P2V4 -= add_vertex(H43P2,0.0,62.3); 
add_edge(H43Pl VI ,H43P2V 1); 
add"edge(H43PlV2,H43P2V2); 



add_edge(H43PlV3,H43P2V3); 
add~edge(H43PlV4,H43P2V4); 
add~ceiling(H43Pl .H43P2); 

add_insunce(“molding37".9,H43.98.0.0.0.0.0.0.0,0,0.0.0); 
return W; /’return pointer to this entire world structure*/ 

} 
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